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(57) Abstract 

Asynchronous Transfer Mode Local Area Network (ATM LAN). The ATM LAN is implemented as a set of MAC entities 
which share a common group address space for the purposes of establishing multicast connections. Each station (10-0) has one or 
more ATM MAC entities (20-0, 20-1) per physical connection to an ATM network (1 1). The network ATM LAN service provides 
the station with ATM LAN configuration information needed for ATM MAC operation. Included in this information is the num- 
ber of ATM LANs the network has configured for that station. 
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VIRTUAL NETWORK USING ASYNCHRONOUS TRANSFER MODE 

BACKGROUND OF THE INVENTION 

The present invention relates to networks and 
particularly to networks of computers that communi- 
cate data and other information. 

Wide Area Networks . 

With the increased bandwidth available through 
transmission channels, for example increases from Tl 
to T3 , and with the increase in bandwidth provided by- 
broadband services such as SONET, larger enterprises 
are evaluating new applications which require higher 
speed communications. These new applications will 
dramatically enhance business productivity, but will 
require vastly improved network control and manage- 
ment facilities. However, neither private networks 
nor common carriers have fully addressed the emerging 
needs of the new communication environment. 

Computer Networks 

In the computer field, in order for users to 
have access to more information and to greater 
resources than those available on a single computer, 
computers are connected through networks. 

In a computer network, computers are separated 
by distance where the magnitude of the distance has 
a significant bearing on the nature of communication 
between computers. The distance can be short, for 
example, within the same computer housing (internal 
bus) , can be somewhat longer, for example, extending 
outside the computer housing but within several 
meters (external bus) , can be local, for example, 
within several hundred meters (local area networks, 
LANs) , within tens of miles (metropolitan area 
networks, MANs) or can be over long distances, for 
example, among different cities or different conti- 
nents (wide area networks, WANs) . 



Multi- Laver Communication Ar chitecture 

For networks, the communication facilities are 
viewed as a group of layers, where each layer in the 
group is adapted to interface with one or more adja- 
cent layers in the group. Each layer is responsible 
for some aspect of the intended communication. The 
number of layers and the functions of the layers 
differ from network to network. Each layer offers 
services to the adjacent layers while isolating those 
adjacent layers from the details of implementing 
those services. An interlayer interface exists 
between each pair of ad j acent layers . The interlayer 
interface defines which operations and services a 
layer offers to the adjacent layer. Each layer 
performs a collection of well-defined functions. 

Many multi- layered, communication architectures 
exist including Digital Equipment's Digital Network 
Architecture (DNA) , IBM' s System Network Architecture 

(SNA) and the International Standards Organization 

(ISO) Open System Interface (OSI) . 

The ISO architecture is representative of multi- 
level architectures and consists of a 7 -layer OSI 
model having a physical link layer, a data link 
layer, a network layer, a transport layer, a session 
layer, a presentation layer, and an application 
layer. 

In the OSI model, the physical layer is for 
standardizing network connectors and the electrical 
properties required to transmit binary l's and O's as 
a bit stream. The data link layer breaks the raw bit 
stream into discrete units and exchanges these units 
using a data link protocol. The network layer per- 
forms routing. The transport layer provides reli- 
able, end-to-end connections to the higher layers. 
The session layer enhances the transport layer by 
adding facilities to help recover from crashes and 
other problems. The presentation layer standardizes 



the way data structures are described and represent- 
ed. The application layer includes protocol handling 
needed for file transfer, electronic mail, virtual 
terminal, network management and other applications. 

In the n- layer multi- layer models, layers l, 2, 
. . . , n are assumed to exist in each host computer. 
Layers 1, 2, . .., n in one host computer appear to 
communicate with peer layers 1, 2, n, respec- 

tively, in another host computer. Specifically, 
layer 1 appears to communicate with layer 1, layer 2 
appears to communicate with layer 2 and so on with 
layer n appearing to communicate with layer n. The 
rules and conventions used in communications between 
the peer layers are collectively known as the peer 
level protocols. Each layer executes processes 
unique to that layer and the peer processes in one 
layer on one computer station appear to communicate 
with corresponding peer processes in the same layer 
of another computer station using the peer protocol. 

Although peer layers appear to communicate 
directly, typically, no data is directly transferred 
from layer n on one computer station to layer n on 
another computer station. Instead, each layer n 
passes data and control information to the n-1 layer 
immediately below it in the same computer station, 
until the lowest layer in that computer is reached. 
The physical medium through which actual communica- 
tion occurs from one computer station to another 
exists below the top. layer n and typically below the 
bottom layer 1. 

In order to provide communication to the top 
layer n of an n- layer network, a message, M, is 
produced by a process running in a top layer n of a 
source computer station. The message is passed from 
layer n to layer n-1 according to the definition of 
the layer n/n-1 interface. In one example where n 
equals 7, layer 6 transforms the message (for exam- 



pie, by text compression) , and then passes the new 
message, M, to the n-2 layer 5 across the layer 5/6 
interface. Layer 5, in the 7 layer example, does not 
modify the message but simply regulates the direction 
of flow (that is, prevents an incoming message from 
being handed to layer 6 while layer 6 is busy handing 
a series of outgoing messages to layer 5) . 

In many networks, there is no limit to the size 
of messages accepted by layer 4, but there is a limit 
imposed by layer 3. Consequently, layer 4 must break 
up the incoming messages into smaller units, prefix- 
ing a header to each unit. The header includes 
control information, such as sequence numbers, to 
allow layer 4 on the destination computer to put the 
pieces back together in the right order if the lower 
layers do not maintain sequence. In many layers, 
headers also contain sizes, times and other control 
fields . 

Layer 3 decides which of the outgoing lines to 
use, attaches its own headers, and passes the data to 
layer 2 . Layer 2 adds not only a header to each 
piece, but also a trailer, and gives the resulting 
unit to layer 1 for physical transmission. At the 
destination computer, the message moves upward, from 
lower layer 1 to the upper layers, with headers being 
stripped off as it progresses. None of the headers 
for layers below n are passed up to layer n. 

Virtual Peer To Peer Communication 

An important distinction exists between the 
virtual and actual communication and between proto- 
cols and interfaces. The peer processes in source 
layer 4 and the destination layer 4, for example, 
interpret their layer 4 communication as being 
"direct" using the layer 4 protocol without recogni- 
tion that the actual communication transcends down 
source layers 3, 2, 1 across the physical medium and 
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thereafter up destination layers 1, 2, and 3 before 
arriving at destination layer 4- 

The virtual peer process abstraction assumes a 
model in which each computer station retains control 
5 over its domain and its communication facilities 
within that domain. 

Communication Networks Ge nerally 

For more than a century, the primary interna - 

10 tional communication system has been the telephone 
system originally designed for analog voice transm- 
ission. The telephone system (the public switched 
network) is a circuit switching network because a 
physical connection is reserved all the way from end 

15 to end throughout the duration of a call over the 
network. The telephone system originally sent all 
its control information in the 4 kHz voice channel 
using in -band signaling. 

To eliminate problems caused by in-band signal - 

2 0 ing f in 1976 AT&T installed a packet switching 
network separate from the main public switched 
network. This network, called Common Channel Inter- 
office Signaling (CCIS) , runs at 2.4 kbps and was 
designed to move the signaling traffic out-of-band. 

25 With CCIS, when an end office needed to set up a 
call, it chose a channel on an outgoing trunk of the 
public switched network. Then it sent a packet on 
the CCIS network to the next switching office along 
the chosen route telling which channel had been 

30 allocated. The next switching office acting as a 
CCIS node then chose the next outgoing trunk channel, 
and reported it on the CCIS network. Thus, the 
management of the analog connections was done on a 
separate packet switched network to which the users 

35 had no access. 

The current telephone system has three distinct 
components, namely, the analog public switched 
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network primarily for voice, CCIS for controlling the 
voice network, and packet switching networks for 
data. 

5 Future Communication Networks - ISDN 

User demands for improved communication services 
have led to an international undertaking to replace 
a major portion of the worldwide telephone system 
with an advanced digital system by the early part of 
10 the twenty- first century. This new system, called 
ISDN (Integrated Services Digital Network) , has as 
its primary goal the integration of voice and nonvoi- 
ce services. 

The investment in the current telephone system 
15 is so great that ISDN can only be phased in over a 
period of decades and will necessarily coexist with 
the present analog system for many years and may be 
obsolete before completed. 

In terms of the OS I model, ISDN will provide a 
20 physical layer onto which layers 2 through 7 of the 
OSI model can be built. 

Telephon e Network Domains 

In a telephone network, the system architecture 
25 from the perspective of the telephone network is 
viewed predominantly as a single domain. When commu- 
nication between two or more callers (whether people 
or computers) is to occur, the telephone network 
operates as a single physical layer domain. 

30 

Communi cation Network Architectures 

Most wide area networks have a collection of 
end-users communicating via a subnet where the subnet 
may utilize multiple point-to-point lines between its 
35 nodes or a single common broadcast channel. 

In point-to-point channels, the network contains 
numerous cables or leased telephone lines, each one 



connecting a pair of nodes. If two nodes that do not 
share a cable are to communicate, they do so indi- 
rectly via other nodes. When a message (packet) , is 
sent from one node to another via one or more inter- 
mediate nodes, the packet is received at each inter- 
mediate node in its entirety, stored there until the 
required output line is free, and then forwarded. In 
broadcast channels, a single communication channel is 
shared by all the computer stations on the network. 
Packets sent by any computer station are received by 
all the others. An address field within the packet 
specifies the intended one or more computer stations. 
Upon receiving a packet, a computer station checks 
the address field and if the packet is intended only 
for some other computer station, it is ignored. 

Most local area networks use connectionless 
protocols using shared medium where, for example, all 
destination and source information is included in 
each packet and every packet is routed autonomously 
with no prior knowledge of the connection required. 

In the above- identified application CONCURRENT 
MULTI - CHANNEL SEGMENTATION AND REASSEMBLY PROCESSORS 
FOR ASYNCHRONOUS TRANSFER MODE (ATM) an apparatus for 

concurrently processing packets in an asynchronous 
transfer mode (ATM) network is described. Packets 
that are to be transmitted are segmented into a 
plurality of cells, concurrently for a plurality of 
channels, and the cells are transmitted over an 
asynchronous transfer mode (ATM) channel. Cells 
received from the asysnchronous transfer mode (ATM) 
channel are reassembled into packets concurrently for 
the plurality of channels. 

Accordingly, there is a need for new networks 
which satisfy the emerging new requirements and which 
provide broadband circuit switching, fast packet 
switching, and intelligent network attachments. 





WO 94/07316 - PCT/US93/08674 



10 



-8- 

SUMMARY OF INVENTION 

The present invention is an Asynchronous Trans- 
fer Mode Local Area Network (ATM LAN) . The ATM LAN is 
implemented as a set of MAC entities which share a 
common group address space for the purposes of estab- 
lishing multicast connections. Each station has one 
or more ATM MAC entities per physical connection to 
an ATM network. The network ATM LAN service provides 
the station with ATM LAN configuration information 
needed for ATM MAC operation. Included in this 
information is the number of ATM LANs the network has 
configured for that station. 

In the present invention, a communication system 
includes an ATM network. The ATM network has a 
15 plurality of ports, each port having a unique port 
address. The ATM network includes one or more ATM 
switches for connecting sending ports to receiving 
ports . 

The communication system includes a plurality of 
stations, each station having a unique station 
address distinguishing the station from other sta- 
tions. Each station is connected to the ATM network 
at a port whereby source stations communicate with 
destination stations. Each station provides packets 
for transferring information, information including 
a destination station address, for addressing desti- 
nation stations. Each station includes a packet 
converter for converting between packets and cells 
for transfers between stations. 

The communication system provides address 
resolution for determining a port address corre- 
sponding to a destination station address. The 
address resolution includes multicast for multicast- 
ing the destination station address to a group of 
35 stations. 

The communication system provides manage- 
ment for requesting connections through the ATM 



20 



25 



30 



network connecting sending ports to receiving ports 
whereby packets are transferred from source stations 
to destination stations by cell transfers through ATM 
network. 

ATM LANs may are extended by bridging several 
ATM LANs together using transparent MAC bridges and 
routers . 

Permanent virtual connections or switched 
virtual connections may underlie the layer manage- 
ment . 

The communication system operates with a 
multi- level architecture, such as the ISO architec- 
ture, and Logical Link Control (LLC) , Media Access 
Control (MAC) and addressing functions are performed 
for ATM LANs. An ATM LAN provides support for the 
LLC sublayer by means of a connectionless MAC sublay- 
er service in a manner consistent with other IEEE 802 
local and metropolitan area networks. The ATM LAN 
interface is built on the user-to-network interface 
for ATM and adaptation layers. 

The communication system including the' ATM 

LAN provides the following benefits: 

Physical plug- in locations can be moved and 
changed without changing logical locations. 

The stations in the communication system are 
partitionable into multiple work groups. 

The communication system provides high bandwidth 
that supports multimedia applications including 
voice, video, real-time and time- sensitive applica- 
tions. 

The communication system integrates Wide Area 
Networks (WAN) and Local Area Networks (LAN) into one 
system. 

The foregoing and other objects, features and 
advantages of the invention will be apparent from the 
following detailed description in conjunction with 
the drawings. 
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BRIEF DESCRIPTION OF THE DRAWINGS 

FIG. 1 depicts a number of user stations con- 
nected together in an ATM network system. 

FIG. 2 depicts the multi- level protocol used to 
5 connect two or more stations in the ATM network 
system of FIG. 1. 

FIG. 3 depicts the network layer and the data 
link layer connected to a ATM interface in the ATM 
network system of FIGs. 1 and 2. 
10 FIG * 4 depicts details of the ATM MAC sublayer 

and the ATM interface for stations of FIGs. 1 and 2. 

FIG. 5 depicts details of the ATM LAN Server and 
the ATM interfaces of the network of FIGs. 1 and 2. 
FIG. 6 depicts three ATM LANs configured on a 
15 three -switch ATM network. 

FIG. 7 is a representation of the details of the 
ATM MACs of stations SO, SI, S2 and S3 from FIG. 6. 



-It - 

DETAILED DESCRIPTION 

In FIG. 1, an ATM network system is shown in 
which two or more computer stations 10 are intercon- 
nected by an ATM network 11 for network communica- 
tion. The stations 10 include the station SO, Si, 

, Ss designated 10-0, 10-1, . .., 10 -s. The ATM 

network system of FIG/ 1 employs, for example, the 
top six of the seven OSI model layers. The OSI model 
physical layer 1 is replaced with a ATM interface 
which operates in an asynchronous transfer mode (ATM) 
in accordance with the B-ISDN protocol. 

In FIG. 2, the ATM network 11 connects, by way 
of example, the SO station 10-0 to the SI station 10- 
1. The SO station 10-0 includes the top six OSI 
layers, namely, the application layer [0, 7] , the 
presentation layer [0, G] , the session layer [0,5] 
and the transport layer [0,4]. The layers 7 through 
4 in FIG. 2 are designated as the higher layers and 
operate in the conventional manner for the OSI model. 

In FIG. 2, the SO station 10-0 includes the 
network layer [0,3] and the data link layer, [0, 2]. 
The data link layer [0,2] includes the logical link 
control (LLC) sublayer and the media access control 
(MAC) sublayer. The MAC sublayer in the data link 
layer [0, 2] connects to a ATM interface 13-0. The 
ATM interface 13-0 operates in accordance with the B- 
ISDN protocol defined by the CCITT. 

In FIG. 2, the SI station 10-1 has the higher 
layers including the application layer [1,7], the 
presentation layer [1,6], the session layer [1,5] and 
the transport layer [1,4] . The SI station 10-1 also 
includes the network layer [1,3] and the data link 
layer [1,2] that connects to the ATM interface 13-1. 
In FIG. 2, the ATM interface 13-0 for the SO station 
10-0 and the ATM interface 13-1 for the Si station 
10-1 connect to a ATM switch 13' in the ATM network 
11. The ATM interfaces 13-0 and 13-1 and ATM switch 
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13 ' operate in accordance with an ATM architecture 
for ATM communicationn. The ATM LAN communication is 
under control of an ATM LAN server 12 in the ATM 
network 11. 

5 In FIG. 2 each of the higher layers in the SO 

station 10-0 and in the SI station 10 -1 function in I 
a well known manner in accordance with the OSI model. 
Also, the network layer [0, 3] in the SO station 10-0 
and the network layer [1, 3] in the SI station 10-1 
10 conform to the model OSI. The data link layer [0,2 in 
the SO station 10-0 and the data link layer [1,2] in 
the SI station 10-1 have OSI compatibility. The 
compatibility with the OSI . model at the data link 
layer enables the ATM network system of FIGs. l and 
15 2 to be compatible with other local area networks and 
other networks that conform to the OSI model from 
layer [2] and above. Below the OSI layer [2], the 
communication and connections are compatible with the 
B-ISDN model of the CCITT. 
20 The FIG. 2 communication network system is a 

hybrid of the OSI model above layer [1] and asynchr- 
onous transfer mode below the data link layer [2] . 

In FIG* 3 # further details of the SO station 10- 
0 are shown and are typical of all of the other 
25 stations 10-1, 10-s of FIG. 1. In FIG. 3, the 

higher layers 7, 6, 5 and 4 are conventional. 
Typically the higher layers of the station 10- 0 of 
FIG. 3 are implemented on a processor such as a Sun 
Workstation. 

30 In FIG. 3, the network layer [3] uses any one of 

a number of standard protocols such as the IP proto- 
col 15, the DEC NET protocol 16, the OSI protocol 17 
or the XNS protocol 18. Any other protocol can be 
implemented in the network layer 3. 

35 In FIG. 3, the data link layer [2] includes the 

LLC sublayer and the MAC sublayer. The LLC sublayer 
includes the Logical Link Control (LLC) 19 which is 
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conventional in the data link layer of the OSI model. 

The data link layer [2] also includes the MAC 
sublayer which as a component of the data link layer 
[2] . The MAC sublayer typically may include other 
MAC sublayers in accordance with the standards IEEE 
802.3, 802.4, 802.5, 802.6 and FDDI . ATM LANs are, 
therefore, capable of interoperating with a wide 
variety of media. ATM LANs interoperate with all 
IEEE 802 Local Area Networks and Metropolitan Area 
Networks using transparent bridges and routers. 
Stations connected to ATM LANs communicate with 
stations connected to any IEEE 802 LAN or MAN via a 
bridge . 

In accordance with the present invention, the 
data link layer [2] also includes a new ATM MAC 
sublayer 22 analogous to the other MAC sublayers 23. 
The ATM MAC sublayer 22 .differs from the other MAC 
sublayers 23 in that the ATM MAC sublayer 22 communi- 
cates with the ATM switch 13 for ATM communication. 

In FIG. 3, the ATM MAC sublayer 22 includes one 
or more ATM MACs including, for example, ATM MAC 0, 
ATM MAC 1, ATM MAC M designated 21-0 , 21-1, 

21-M respectively. Each of ATM MACs 21-0, 21-1,..., 
21 -m defines an ATM local area network (ATM LAN) . 
The ATM MACs of the ATM MAC sublayer 22 connect 
between the logical link control 19 and the ATM 
interface 13-0. The control of which of the stations 
(like the stations 10-0, 10-1,..., 10-s) are serviced 
by particular ones of the ATM MACs 21 of FIG. 3 is 
determined by the station management 20 within the 
ATM MAC sublayer 22. Other stations (or the same 
stations) may also be serviced by other local area 
networks such as Ethernet under control of the other 
MAC sublayers 23. 

In FIG. 3, the ATM MAC sublayer is capable of 
servicing the communication requirements of the 
stations 10-0 through 10-s of FIG. 1 in one or more 
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ATM LANs. Stations can be switched from one ATM LAN 
to another ATM LAN under control of station manage- 
ment 20 without requirement of modifying the physical 
connection to the station. For this reason, the ATM 
5 LANs are virtual LANs . 

In FIG. 4, further details of the ATM MAC 
sublayer 22 and the ATM interface 13-0 of FIG. 3 are 
shown. 

In FIG. 4 the ATM MAC sublayer includes the 
0 station management 20 and the ATM MACs including the 
ATM MAC 0, . ATM MAC M designated as 21-0, . .., 
21-M. 

In FIG. 4, the ATM MAC 0 includes the multicast 
address resolution 24, the unicast address resolution 
5 25, the frame 26 and the connection management 27. 

In FIG. 4, the ATM interface 13-0 includes the 
signaling protocol 28 in the control plane, the ATM 
ADAPTATION LAYER (AAL) 29, the ATM layer 30 and the 
physical layer 31. 
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1 ATM LANs 

1 . 1 Introduction 

In FIG. 3, the higher layers [7,6,5,5] and [3] 
are conventional while the data link layer [2] in- 
5 eludes the LLC sublayer and the ATM MAC sublayer to 
implement the Asynchronous Transfer Mode Local Area 
Networks (ATM LANs). Such an implementation is 
provided with newly defined Media Access Control 
(MAC) including addressing protocols. The ATM LAN 

10 provides support for the LLC sublayer by means of 
connectionless MAC sublayer service in a manner 
consistent with other IEEE 802 local area networks 
(LAN) and metropolitan area networks (MAN). The ATM 
LAN interface is built on the user-to-network inter- 

15 face for the ATM layer and the ATM adaptation layer 
(AAL) . 

An ATM LAN includes a set of MAC entities which 
share a common group address space for the purposes 
of establishing multicast connections. Each station 

20 has one or more ATM MAC entities per physical connec- 
tion to an ATM network. The network ATM LAN service 
provides the station with ATM LAN configuration 
information needed for ATM MAC operation. Included 
in this information is the number of ATM LANs the 

25 network has configured for that station. 

The user- to- network interface at the LLC and 
MAC levels is defined for the ATM LAN Architecture in 
a manner analogous to other Data Link Layer architec- 
tures . 

30 

1.3 ATM LAN Functionality 

An ATM LAN has the following characteristics : 
addressing- all LANs connected by MAC 

bridges use 48 bit addressing 
35 unicast- all stations can send fra- 

mes to any other station in the 
LAN 
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duplication- frames are not duplicated 
broadcast- all stations can broadcast 

to every other station in a LAN 
multicast- any station can send to any 

5 group address and any station 

can register to receive frames 
for any group address 
promiscuity- any station may chose to 

receive all frames with group 
10 destination addresses 

1.4 ATM LANs 

An ATM LAN is a local network having a set of 
stations which share a common group address space for 
the purpose of establishing multicast connections, 
15 An ATM LAN is implemented using services of ATM LAN 
MAC, ATM signaling and ATM Adaptation Layers. 
Stations may participate in more than one ATM LAN. 
ATM LANs may be bridged together using MAC bridges. 
ATM LANs are sometimes called Virtual LANs 
20 because they are not limited by the limitations of 
any physical media characteristics. A single under- 
lying ATM network may support many ATM LANs. A 
station with a single ATM interface may be connected 
to many separate ATM LANs. There are no inherent 
25 limitations in the ATM LAN protocol itself to re- 
strict either the physical extent or the number of 
stations in a particular ATM LAN. Practical limita- 
tions, such as multicast traffic, usually limit the 
size and scope of ATM LANs. 
30 ATM LANs interoperate with a wide variety of 

media. ATM LANs can interoperate with all IEEE 802 
Local Area Networks and Metropolitan Area Networks 
using transparent bridges and routers. Stations 
connected to ATM LANs are able to communicate with 
35 stations connected to any IEEE 802 LAN/MAN connected 
via bridge. 
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2 ATM LAN Architecture 

2 . 1 Overview 

An ATM LAN includes a set of procedures and 
5 protocols which work together to provide the services 
found in IEEE 802 LANs . The AAL and ATM protocols 
defined by CCITT are augmented by the ATM LAN MAC 
layer which maps unacknowledged MAC PDUs (MAC Proto- 
col Data Units) onto unacknowledged AAL PDUs trans- 

V 

10 mitted over virtual connections provided by the ATM 
physical layer. The ATM MAC manages connections 
using an ATM signaling protocol. 

2.2 Logical Link Control 

Stations must comply with 802.2 Type I specif i- 
15 cation which is defined by ISO 8802. This includes 
mandatory response to XID (Exchange ID) and Test 
commands . 

When SNAP encapsulations are defined for upper 
layer protocols they are used. 
20 2.3 Station ATM LAN MAC 

Each station has one ATM LAN module per physical 
ATM interface. Each ATM LAN module provides MAC 
services via one or more ATM MAC entities. The ATM 
LAN server provides the ATM LAN MAC with config- 
25 uration parameters. 

2.3.1 ATM MAC Functions 

The ATM MAC layer provides the following func- 
tions : 

ATM LAN Configuration- determines the number 

3 0 of ATM LANs which have been 

configured for the station 
and the operational parame- 
ters needed to establish 
multicast connections for 

35 each ATM LAN. 

MAC PDU Framing- MAC SDUs (Service Data 

Units) are encapsulated in 
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Address Resolution- 



Connection Management - 



Multicast Service- 



an AAL specific framing, 

IEEE 802. 48 bit MAC 

addresses are mapped onto 
E.164 ATM addresses. 

establishes and rele- 
ases virtual connections 
for transmission of MAC 
PDUs (Protocol Data Units) 
and reception of frames ad- 
dressed to registered group 
(multicast ) addresses . 

protocol and procedur- 
es are defined for trans- 
mission and reception of 
frames with group address- 
es. The network provides 
unreliable delivery via 
multicast service. The 
interface to the multicast 
service is AAL specific. 
The interface to be used is 
determined by configuration 
management . 
ATM MAC Entity Service Interface 
The ATM MAC entity provides the following 
service interface to MAC users. 



2.3.2 



Primitive 



Parameters 



M_UNITDATA. request 



M_UNITDATA. indication 



M_REGISTER_ADDRESS 
M_UNREGISTER_ADDRESS 
M_REGISTER_ALL 
M UNREGISTER ALL 



destination address 

source address 

mac service data unit 

destination address 

source address 

mac service data unit 

group address 

group address 
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2.4 ATM Adaptation Layer 

The adaptation layers provide transmission and 
reception of frames on virtual connections. The 
standard CCITT AAL are used. In this application, 
AAL 3 is used to denote AAL 3/4 when end systems 
negotiate the use of the multiplexing identifier. 
AAL 4 is used to identify AAL 3/4 when the multiple- 
xing identifiers used are specified by the network. 
IEEE 802.2 LLC will be identified by a value of 1 in 
the protocol id field of AAL 3/4 frames. 

2.5 AIM Signaling Protocol 

The ATM LAN signaling protocol contains a subset 
of the functions in Q.93B. It provides the following 
services : 

o establishment of virtual connections (VCs) 

o negotiation of the upper layer protocol (ULP) 

o clearing of connections 

o dynamic port address assignment 

o user to network keep alive 

2 . 6 ATM LAN Server 

The ATM LAN server provides configuration and 
multicast services. It provides operational parame- 
ters for each ATM LAN in which each ATM station is 
configured. Membership in ATM LANs is controlled via 
policies implemented by the server. These policies 
may vary between ATM LAN providers. The ATM LAN 
configuration protocol defines the information 
provided by stations with which servers may implement 
policies. Two policies which can be implemented are 
"port based configuration" and "station based config- 
uration" . The ATM LAN server may use the physical 
cabling to determine LAN membership. This is called 
"port based configuration" . Alternatively, the ATM 
LAN server may use station MAC addresses to determine 
LAN membership. This is called "station based 
configuration". The same station to server protocol 
is used in either case. The station is not affected 
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by the configuration policies implemented. When 
requesting ATM LAN configuration parameters, the 
station always provides its MAC address (es) . 

The station table shown below is an example of 
the station-based configuration for the system shown 
in FIG. 6. The port table shown below is an example 
of port -based configuration for the system shown in 
FIG. 6. 

STATION TABLE 
(VLAN MEMBERSHIP) 

VLAN MAC ADDRESS 

VLAN1 MAC_Add[0] (SO) ,MAC_Add[l] (SI) ,MAC Add [5] (S5) . . . 

VLAN2 MAC_Add [2] (S2) ,MAC_Add[6] (S6) . . .~ 

VLAN3 MAC_Add[0] (SO) ,MAC_Add[3] (S3) ,MAC_Add[4] (S4) . . . 

PORT TABLE 
(VLAN ASSOCIATION) 

Port Ad dresses Fa /p&1 VLAN 

PA [2,2], PA [2,3], PA [2,4], PA [2,5] VLAN [3] 

PA [2,6], PA [2,7], PA [2,8], PA [2,9] VLAN [2] 



PA [2,3], PA [3,4] VLAN [3] 



Each station establishes a VC to an ATM LAN server 
for each physical interface. A well known group 
address is used. If redundant ATM LAN servers are 
providing configuration and multicast service, this 
service is transparent to the ATM station. The 
servers agree amongst themselves which ones will 
serve any particular station. The servers may elect 
to distribute responsibility for multicast service 
over several servers. This election is transparent 
to the station. 

3. ATM LAN Configuration Management 

A station may belong to one or more distinct ATM 
LANs. The station will then have been configured 
with one or more MAC entities each having a unique 
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MAC address. 

At power-on, the station establishes a VC to the 
network ATM LAN server. The station ATM MAC sends a 
configuration enquiry to the ATM LAN server. The 
enquiry contains the station's MAC address, alan_jmac. 
struct alan_req { /* configuration request */ 
u_char alan_proto; 
u_char alan_pdu_type ; 

u_ short alan_seqnum; 
struct atm_addr alan_mac; 

}; 

Using the unique MAC address, alan_mac, the ATM 
LAN server determines the number of ATM LANs config- 
ured for that station and the conf iguration for each 
connected ATM LAN. A configuration response is sent 
to the station. 

struct alan_config { 

u_char alan_proto; 

u_char alan pdu type ; 

u_short a 1 an_s eqnum ; 

int alan_num_lans ; 

struct alan_jparms alan_lan[]; 

}; 

The configuration response contains one alans_ pa- 
rms per ATM LAN. For each ATM LAN the configuration 
manager activates an ATM MAC entity. The parameters 
in the alan parms element control the configuration 
parameters of each ATM LAN "tap". 

Each ATM LAN 'tap' is described by the following 
parameters. The alan_config and alan_update messages 
contain one or more alan parms structures, 
struct alan parms { 

int alan_version; 
int alan__aal ; 

struct atm_addr alan_port; 
struct atm_addr alan_mcast_base; 
struct atm_addr alan_lan_uid [] ; 
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i nt alan_num_mcast; 
u_short alanjmid; 
u_short alanjntu; 

}; 

The alan_aal parameter specifies which AAL is used 
for multicast frames. Currently defined values are 
4 and 5 for AALs 4 and 5 respectively. The alan_port 
is the port address from which VCs are setup for this 
ATM LAN. The ATM LAN server may specify different 
port addresses for different taps or may specify the 
same for all. The ATM MAC entity treats this E.164 
address as an unstructured bit string. 

The ATM LAN manager allocates a range of E.164 
group address space for each ATM LAN. The al- 
an_mcastjbase is E.164 group address which is used in 
conjunction with alan_num_mcast (the number of group 
addresses allocated to the ATM LAN) to map IEEE 802.1 
group addresses onto the E.164 group address space. 
AAL and multicast service parameters are protocol 
specific. 

AAL multicast service requires that multicast AAL 
PDUs be transmitted using multiplexing identifiers, 
(MIDs) , provided by the ATM LAN server. This allows 
multicast service to be provided via replication 
functions often found in ATM switch fabrics. Each 
ATM MAC entity is assigned a LAN unique MID ' for 
transmission and must reassemble AAL using the full 
10 bit MID. 

Each ATM LAN is assigned a globally unique identi- 
fier, alan_lan_uid. This is a 128-bit name created 
by the ATM LAN server. The ATM LAN server provides 
alan_parms structures for the requested MAC address- 
es. If the station requests configuration parameters 
for two MAC addresses which belong to the same ATM 
LAN, two identical alanjparms elements are returned. 

Once the ATM MAC entities have been created, the 
configuration manager periodically sends keep alive 
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frames on the configuration SVC. If the configura- 
tion SVC is released the configuration manager 
destroys the ATM LAN entities it created. If after 
some number of retries the ATM LAN server does not 
respond to keep alive packets, the configuration 
manager will release the configuration SVC and 
destroy ATM MAC entities. 

Configuration Acquisition Protocol State Machine 



State 


Event 


Actions 


Newstate 


Inactive 


Activate 


Setup Request 
Start timer CI 


Wait for Setup 
Conf 


Wait for 
Setuo Conf 


Release 
Ind 


Setup Request , 
Start timer CI 


Wait for Setup 
Conf 




Setup 
Conf 


Config Request, 
Start Timer C2 


Wait for Setup 
Conf 


Wait for 
Setup Conf 


Timeout 


Config Request, 

Increment 

Retries 


Wait for Setup 
Conf 




Max 

retries 


Release, 
Setup Request 


Wait for Setup 
Conf 

• 




Conf ig 
Resp 


Activate 
MAC Entities 


Active 


Any state 
| Active 


Deactiv- 
ate 


Deactive active 
MAC entities, 
Release config- 
uration VC 


Inactive 




Release 
Ind 


Setup Request, 
Start timer CI 


Setup Request, 
Start timer CI 


4. ATM LAN 


MAC 







The ATM MAC maps IEEE 802.1 flat 48 bit addresses 



to 60 bit hierarchical E.164 ATM addresses by the 
address resolution function. Individual IEEE 802. 
addresses are mapped into port addresses via the ATM 
Address Resolution Protocol, ATM ARP. Group IEEE 
802 . l addresses are mapped to ATM group addresses 
using a fixed algorithm. 

Once an ATty address is determined, the ATM signal- 
ing protocol is used to establish a virtual connec- 
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tion. The connection is either a unicast connection 
or a multicast connection depending upon whether the 
ATM address is an individual or group address. 
Connection management is responsible for establishing 
5 and clearing these connections. 

Once the appropriate connection has been determined 
for a frame, it is encapsulated in an AAL specific 
encapsulation method. AAL 4 and AAL 5 have distinct 
multicast mechanisms due to the limitations of AAL 5. 
10 4.1 Framing 

4.1.1 AAL 3/4 

ATM LAN uses the same MAC framing as 802.6. ATM 
LANs use 48 bit MAC addresses to enable interoperab- 
ility with 802 LANs via MAC bridges. As shown in the 
following table, addresses are encoded as byte 
quantities as per 802.6. 

COM MCP HEAD HEAD LLC PAD CRC COM 

20 HEAD EXT 32 PDU 

DEST SOUR MC TRAIL 

ADR ADR BITS 



15 



25 



8 8 



0-20 0-9188 0-3 0,4 



30 ?n 0t ?™ £°? Qos CRC He ad Bridging 

30 ID Delay Loss ind Ext (No^t Used) 

Len 



40 



16 



35 4.2 Addresses 

Two types of addresses are used in an ATM LAN, 
station MAC addresses and ATM (or port) addresses! 
Both types of addresses may either be individual or 
group addresses. 

MAC station addresses identify individual sta- 
tions connected to an ATM LAN. Station addresses are 
48 bit universally administered 802.1 MAC addresses 
These MAC addresses enable interoperability with 
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802. ID LAN MAC bridges. Station addresses are used 
as MAC frame source or destination addresses. 

MAC group addresses are used to address frames to 
multiple destination stations on an ATM LAN. Group 
5 addresses are used to set up virtual connections to 
multiple destination stations without knowledge of 
those stations' individual addresses. They are used 
to provide multicast and broadcast services. Broad- 
cast is a a specific instance of multicast with all 

10 stations receiving frames with well defined group 
address, specifically all l's. Group addresses are 
48 bit universally or locally administered 802. MAC 
addresses. The group address with all bits set to 
one is the broadcast address. 

15 ATM Port addresses or port addresses or ATM 

individual addresses identify physical ports on 
switches. They are hierarchical 60 bit E.164 ad- 
dresses dynamically assigned by the network. Each 
virtual connection has a port address for at least 

20 one endpoint. Port addresses are used in ATM ARP and 
Signaling PDUs. 

ATM group addresses (or multicast port address- 
es) identify an ATM level multicast group. They are 
used in signaling PDUs. 

25 AddressTyp e Padding Address 

ATM port llOx no padding 60 bits 
address 

ATM group 11 lx no padding 60 bits 
30 address 

MAC station 1000 12 bits 48 bits 



40 



35 MAC group 1000 12 bits 48 bits 

address 



x - indicates whether the address is publicly or 
privately administered 

4.3 Multicast Service 
4.3.1 Background 

Any station on the LAN can register to receive 
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frames addressed to specific group addresses. All 
stations register to receive frames addressed to 
group address FFFFFFFFFFFP which is defined to be the 
broadcast group address. Any station can send frames 
to any group address without the knowledge of which 
stations want to receive them. 
4.3.2 ATM LAN Multicast 

In an ATM LAN, multicast capability is provided 
by the multicast server which is part of the LAN 
server. Stations use that service by establishing 
virtual connections to the server using the multicast 
base a™ address provided in the configuration 
parameters (alanjparms) . The multicast base address 
is a privately administered group E.164 address. 
Virtual connections with a group ATM address at one 
endpoint are multicast VCs. When setting up a 
multicast VC the station may request transmit only 
access so that it will not receive frames transmitted 
on that VC. 

IEEE 802.1 48 bit addressing provides for up to 
2** possible group addresses all registered by various 
stations in one LAN. Few ATM networks could support 
2** virtual connections. To bridge this gap in 
service offering and network capability, each ATM LAN 
is configured to support a small (typically 100s) 
number of multicast circuits. This number is export- 
ed in the alanjparms configuration element. Each ATM 
MAC entity is also provided with a multicast base 
address which is treated as a 64 -bit integer. These 
two numbers are used to map many 4 8 -bit IEEE group 
addresses to fewer ATM group addresses which are then 
used to setup multicast connections. if al- 
an_num_multicast is zero, then the 48 -bit group 
address is added to alan_mcast_base. Otherwise the 
48 -bit group address is treated as a 16 most signif- 
icant bits of the 48-bit group address are Exclusive- 
Ored into the 32 least -significant bits, the result 
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is divided by alan_num_mcast and the resulting 
remainder is added to alan_mcast_base. In either 
case, the result value is used as a group address to 
set up a multicast connection for that group address. 
5 4.3.3 Registering for a group address 

Each ATM MAC entity maintains a list of group 
addresses for which its users have requested it 
receive frames. Each of these group addresses is 
mapped onto a ATM group address when the MAC entity 

10 is given is alan parms information, that is, when it 
becomes active. There after, the ATM MAC entity will 
maintain a multicast connection for each port address 
derived from the above computations. Note, several 
MAC group addresses may map onto one group port 

15 address. In this case, only one connection is main- 
tained for those MAC group addresses. If the network 
releases a multicast connection, the ATM MAC entity 
will re-establish another one. 

The ATM MAC entity will always maintain a multic- 

20 ast connection for the group port address derived 
from the broadcast MAC address. 

4.3.4 Transmission of Multicast MAC PDUs 

When an ATM MAC entity is presented with a 
M_UNITDATA. request with a group destination address 

25 it maps the group MAC address to the group ATM 
address, and transmits the MAC PDU on the connection 
established to that port address. If no connection 
is already established, the frame is queued until one 
is established. Multicast connections setup solely 

30 for the transmission of multicast PDUs are aged in 
the same fashion as those setup for unicast PDUs. 

4.3.5 Reception of Multicast MAC PDUs 

The group destination addresses in received MAC 
PDUs are checked against the list of registered group 
35 addresses. If the group addresses are not regis- 
tered, the frame is dropped. This dropping is 
necessary because transmitters may map MAC group 
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10 



addresses onto a multicast connection established to 
register other group addresses. 

All group addressed frames are not received on 
corresponding multicast connections. Stations 
listening for multicast frames must be prepared to 
receive those frames on either the appropriate t 
multicast VC or the broadcast VC. 
4.3.6 Unregistering a group address 

Multicast connections established for registered 
group addresses are not aged. They are not released 
until the last MAC service users want to receive 
frames addressed to any of the group addresses mapped 
onto that connection. 

The ATM MAC entity maintains reference counts on 
15 the number of MAC service users which have registered 
a group address. A reference count on the multicast 
connection is maintained for each MAC group which 
maps onto the connections group ATM address. 
4.3.7 AAL 4 Multicast Service 
20 Stations connected to multicast VCs can receive 

frames from many sources simultaneously. The multi- 
plexing identifier (MID) in the ALL4 SAR header is 
used to correctly reassemble these frames. MIDs are 
unique within a given ATM LAN. The LAN server 
25 assigns a unique MID to each port address. 

Up to 1023 stations may be connected to an ATM 
AAL 3/4 LAN. Each station has a globally unique 48- 
bit address per ATM LAN. Each station is assigned 
one MID per ATM LAN (local port address to the 
station) to be used when transmitting frames on 
multicast VCs. Stations may not transmit more than 
one frame simultaneously on multicast VCs with the 
same local port address. Each station implements MAC 
level address filtering for frames received on 
35 multicast VCs. 

Each station has a multicast filter which is used 
to filter frames received on broadcast VCs. This 



30 



WO 94/07316 



PCT/US93/08674 



-2?- 

filter may be implemented in hardware or software. 

The filter is necessary because each ATM network 

provides limited multicast service and stations may 

broadcast unicast frames. 
5 4.3.8 AAL 5 Multicast Service 

AAL 5 does not provide for multiplexing frames on 

a single VC simultaneously. The mid field in the 

alan_parms structure is ignored. There is no limit 

on the number of stations (or ATM MACs) which may 
10 belong to an AAL 5 ATM LAN. 

4V4 ATM Address Resolution Protocol 

Individual IEEE 802.1 MAC addresses are mapped 

into port addresses via the ATM Address Resolution 

Protocol (ATM ARP) . Once the port address is deter- 
15 mined the ATM signaling protocol is used to establish 

a virtual connection. 

4.4.1 ATM ARP Operation 

Stations connected directly to ATM LANs will, 

conceptually, have address translation tables to map 
2 0 MAC addresses (both station and group addresses) into 

virtual connection identifiers. The MAC- to-port 

table, provides mappings from MAC addresses to port 

addresses . 

The MAC transmission function accesses this table 
25 to get next hop port address given destination 
station address. This table is updated when new 
station address to port address mappings are learned 
via ATM ARP and when MAC group address to ATM group 
address mappings are computed. The entries in the 
30 MAC to port table are updated when ATM ARP requests 
and replies are received. 

When the MAC layer is presented with a frame for 
transmission, it looks up the destination address in 
the station to port address table. If an entry is 
35 found, connection management selects the appropriate 
virtual connection upon which the frame should be 
transmitted. 
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If no entry is found, a new entry is allocated 
for that MAC address. If the MAC address is a group 
address, an AIM group address is computed using an 
AAL specific function. This operation permits the 
broadcast VC to be established without sending ATM 
ARP requests. Mapping individual MAC addresses to 
port addresses is accomplished by broadcasting an ATM 
ARP request for the MAC addresses to all stations 
connected to the ATM LAN . The ATM ARP request 
carries the senders MAC and port address mapping. 
All stations receive the request. The station with 
the specified MAC address responds with an ATM ARP 
reply. The responder updates its MAC- to-port table 
using the information in the request. The reply 
carries both the responders' and the requestors MAC 
and port addresses. When the requestor receives the 
ATM ARP reply, it updates its port-to-MAC address 
table. 

MAC to Port entry 

I?***?; ?^rr q ™ Next ^ p — statu* 

Bit 802 ,1 MAr Addreas V. . 1 ca. 



The requesting station must transmit MAC frames 
on broadcast connections until it receives responses 
to its ATM ARP requests. it may then set up a 
connection using the port address in the reply. 
Usually, the responder sets up the connection before 
3 0 replying . 

The ATM ARP function times out entries in the 
MAC-to-port table when they have been idle for some 
time. Connection management is notified when entries 
in the MAC-to-port table are added, updated or delet- 
35 ed. Connection management notifies ATM ARP when 
connections are established and released. Entries in 
this table are deleted when an SVC establishment to 
the port address fails. They are deleted when the 
connection corresponding to an entry is released 
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TABLE 5: Port to VPI-VCI entry 

Local Port Peer Port OPS VPI/VCI 
Address Address 

5 

4.4,2 ATM ARP PDUs 

ATM ARP requests and replies are encapsulated in 
802.2 LLC and the appropriate AAL for the connection 
upon which they are sent. ATM ARP requests are 

10 always broadcast. Therefore they are encapsulated in 
the AAL used for multicast connections. ATM ARP 
replies are usually sent on point to point connec- 
tions. The ATM MACs negotiate the AAL to be used for 
that connection. The reply is then encapsulated in 

15 802.2 LLC and the specific AAL framing. 

The ATM ARP messages are: 

* ATM Address Resolution Protocol. 
*/ 

2 0 struct atm_arp { 



u_short 


aa__llp; /* lower layer protocol 


*/ 


u_short 


aa_ulp; /* upper layer protocol 


*/ 


u_char 


aa_llp_len; 




u_char 


aa_ulp_len; 




u_short 


aa_msg_type ; 




u_char 


aa_sender_port [8] ; 




u_char 


aa_sender_mac [6] ; 

* 




u_char 


aa_target_port [8] ; 




u_char 


aa_target_mac [6] ; 





30 }; 

/* aa_msg_type ' s */ 
#define ATM_ARP_REQUEST 1 
#de f ine ATM_ARP_RE PLY 2 

35 The aa_ulp_len and aa_ llp_len fields are always 

6 and 8 respectively. The aa_ulp field is set to 16. 
The sender^ mac and port addresses are set to the 
sender's Mac and Port addresses for request and 
non-proxy reply messages. The aa_send_mac field in 
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proxy replies contains the aa_target_mac from the 
corresponding request. The aa_target_mac is always 
set to the Mac address needing resolution in requests 
and it is set to the requestor's Mac address in 
replies. The aa_target_port is undefined in requests 
and in replies it contains the aa_sende rjport from 
the corresponding request. The recipient of a reply 
verifies that the aa_target_port corresponds to one 
of its own port addresses . 
4 . 5 Connection Management 

Once a MAC address has been resolved to a ATM 
address a connection to the station receiving frames 
for that MAC address can be set up and those frames 
can be transmitted directly to that station rather 
than broadcast. Connection management is responsible 
for defining the connection establishment and release 
policies. The ATM signaling protocol is used to 
establish connections for ATM LAN MAC frames. A 
specific upper layer protocol identifier is reserved 
for ATM LAN MAC frames. 
4.5.1 Connect Establishment 

Connections are established when an Unacknowl- 
edged Data Request needs to be transmitted to a MAC 
address for which a MAC- to- ATM address mapping is 
known, but no connection to that ATM address, is 
established (or emerging) . It is possible for two 
MAC entities to simultaneously establish connections 
to each other. When connection management receives 
connection setup SDU from ATM signaling, it checks to 
see if a connection to the peer port address already 
exists. If another connection exists (or is being 
established) , the connection initiated from the lower 
port address is released. Thus there will never be 
more than one connection established between two ATM 
MAC entities. 

While a connection is being setup, frames which 
would be transmitted on that connection once it is 
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established must be queued or dropped. Frames should 
not be broadcast. At least one frame must be queued. 
Implementations may chose to queue more. Once the 
connection is set up, any queued frames are transmit - 
5 ted. The first frame transmitted on a connection 
initiated by a station must be the ATM ARP response 
for the an ATM ARP request. 

4.5.2 Quality of Service 

Currently, distinct qualities of service may be 
10 defined for ATM MAC PDUs. 

4.5.3 Connection Release 

Connections for which there is no MAC- to -ATM 
address mapping are held for the product of the 
number of ATM ARP retries and retry interval and then 
15 released. The MAC- to- ATM address mappings are aged 
separately. 

When AIM ARP deletes all the translations to a 
specific ATM address, all connections to that ATM 
address are released. 
20 When a connection is released, the ATM ARP 

function deletes all MAC to ATM translations for that 
connection's remote ATM address. 

4.6 Frame Reception 

Frame Reception Stations are responsible for 
25 performing filtering of incoming frames. Unicast 
addressed frames for other stations will be received 
on the broadcast VC. Multicast frames for unregis- 
tered multicast addresses may be received on multic- 
ast VCs. These frames are not passed up to the MAC 
30 service user. 

4.7 Address Resolution and Connection Establishment 
Example 

In this example, the steps are described that are 
required for one station, called Lyra, to deliver a 
35 MAC UNITDATA SDU to another station, called Altera, 
assuming neither station has had any prior communica- 
tion. It is assumed that both stations are part of 
the same ATM LAN. These steps are only required for 
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the initial transmission from Lyra to Altera. Addi- 
tional MAC PDUs may be transmitted on the connection 
setup by these steps until either station decides it 
no longer wishes to maintain the connection. In this 
example, MAC addresses are expressed in xx:xx:xx:xx- 
:xx:xx form where each pair of hex digits, xx, is one 
octet for the address. Port addressees are expressed 
in the same form except that they have 8 octets. 



o An ATM MAC service user on Lyra provides the ATM 
MAC with an UNITDATA SDU to be sent to station 
address 00 : 80 :b2 :e0 : 00 : 60 . The MAC consults its MAC 
to port address table, but finds no translation. 

o The MAC creates an ATM ARP request for MAC 
address 00:80:b2:e0:00:60. The request contains 
Lyra's own MAC and port addresses, 00 : 80 :b2 : eO : 00 : 50 
and dl:41:57:80:77:68:00:02 respectively. The ATM ARP 
is encapsulated in LLC/SNAP. The destination MAC 
address is f f :ff :ff :ff :ff :ff (the broadcast address) . 
The ATM MAC recursively invokes itself to transmit 
the ATM ARP request. 

25 o The MAC address to port address table is search- 
ed for the broadcast MAC address and the correspond- 
ing port address is obtained, fl:41:57:80:77:68:01:- 
01. The station established a connection to this port 
address when the ATM LAN MAC entered the active 

3 0 state. The ATM ARP PDU is encapsulated in an 802.6 
frame and passed to the AAL 4 function along with the 
MID associated with this ATM MAC entity for transmis- 
sion of that multicast connection. 

35 o The MAC must transmit the MAC SDU. In lieu of a 
valid MAC address to port address mapping the broad- 
cast MAC to port mapping and associated connection 
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are used. The MAC SDU is encapsulated in an 802.6 
frame and passed to the AAL 4 function with the MID 
associated with this ATM MAC entity for transmission 
of that multicast connection. 
5 All the above took place on Lyra. The subsequent 

steps take place on Altera as it receives the ATM ARP 
and the ATM MAC PDU containing user data. 

o The ATM ARP is received by all MAC entities 
10 including Altera. The other MACs determine that the 
requested MAC address is not theirs and ignore the 
request. Altera determines that its MAC address is in 
the request. Altera updates, its MAC to port address 
table with Lyra's MAC and port addresses provided in 
15 the ATM ARP request. Next an ATM ARP reply is con- 
structed using Altera' s port and MAC addresses. This „ 
request, in the form of an MAC SDU with Lyra's MAC r 
address as the destination, is passed to the ATM MAC 
entity. 

20 

o The ATM MAC looks up Lyra's MAC address in the 
MAC to port address table. It finds Lyra's port 
address. The port to VCI table is searched using that 
port address. No entry is found. Connection manage- 
25 ment is invoked to establish a connection to Lyra. 

Connection management passes a SETUP request to ATM 
signaling. The MAC queues the ATM ARP response until 
the connection is established. 

30 o Altera ATM signaling module sends a SETUP PDU to 
establish a connection to port address dl: 41: 57: 80: - 
77:68:00:02. The upper layer protocol (sometimes 
called upper layer compatibility) is the ATM LAN MAC. 
(This is not a function of the ATM MAC. But it is 

35 included for illustrative purposes.) 

o Next all stations receive the MAC. SDU containing 
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the user data on the broadcast connection* All sta- 
tions except Altera determine that the destination 
MAC address is not theirs and drop the frame. Altera 
accepts the frame strips off the 802.6 and LLC/SNAP 
overhead and passes the frame up to the user function 
identified by LLC/SNAP. 

At this time, the SDU provided to Lyra's ATM MAC 
has been delivered to the appropriate MAC user on 
Altera. However, the MAC entities continue connec- 
tion establishment and address resolution for subse- 
quent communications between the two stations . The 
next sequence of operations occurs on Lyra. 

o ATM signaling on Lyra receives a connection setup 
indication from the network. This indication is 
passed up to the upper layer protocol which in this 
instance is the ATM MAC. 

o The ATM MAC receives a setup indication SDU from 
signaling. At this point Lyra knows some other 
station's ATM MAC is trying to setup a connection to 
it. The port to vci table is searched for a connec- 
tion to the callers port address. In this case none 
is found. The connection is accepted by passing a 
CONNECT SDU to ATM signaling. The MAC starts an idle 
timer for the connection. Note, that the ATM MAC can 
not use this connection until an ATM ARP request or 
response is received indicating MAC addresses for 
stations accessible via the connection. 

o Lyra's ATM signaling transmits a CONNECT PDU to 
the network. Typically, network communication is 
bi-directional. Assuming this is the case the MAC 
service user on Altera has responded to the MAC SDU 
indication with a MAC SDU request. The following 
actions take place on Altera. The ordering of the 
arrival of MAC SDU and the CONNECT SDU are arbitrary. 
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o The MAC service user passed the ATM MAC an SDU 
with a destination MAC address of 00 : 80 :b2 : eO : 00 : 50 
(Lyra's) . The MAC finds the mapping from MAC address 
to port address learned when the ATM ARP request was 
5 received from Lyra. The MAC next finds that it is 
setting up a connection to Lyra's port address and 
that the connection is not yet established. A MAC PDU 
is created from the MAC SDU and queued waiting 
connection establishment. 

10 

o Altera ATM signaling receives a connect PDU. This 
is passed up to the MAC as a SETUP confirmation. The 
ATM signaling sends a CONNECT acknowledge PDU to 
Lyra. The connection is considered established. 

15 

o Altera' s ATM MAC, upon receiving the SETUP 
confirmation, transmits all frames which were queued 
awaiting connection establishment. The ATM ARP reply 
is the first frame to transmitted. It is followed by 

2 0 the MAC PDU containing user data. 

At this TIME, address resolution and connection 
are complete on Altera. Any further frames addressed 
to Lyra's MAC address will use the new connection. 
The connection is not established on Lyra. Also Lyra 
25 still does not have a mapping for Altera' s MAC 
address. The following actions complete address 
resolution and connection establishment on Altera. 

o The ATM ARP reply is received on the connection 

3 0 which is still being setup. (Note most ATM networks 

have slower signaling channels than payload channels. 
Typically the ATM ARP response will be received prior 
to the CONNECT acknowledge PDU. ) 

35 o The MAC enters Lyra's MAC address to port 
address mapping in the MAC to port table. At this 
point any MAC UNIT-DATA requests will be queued until 



the SETUP complete indication for the connection is 
passed up from ATM signaling. 

o The MAC PDU containing user data from Lyra's MAC 
users is received. The 802.6, LLC and SNAP headers 
are removed and a MAC UNITDATA indication is passed 
up to the appropriate MAC service user. 

o Altera' s ATM signaling receives a CONNECT_ACK 
PDU. This moves the connection into established 
state. The ATM signaling function passes up a SETUP 
COMPLETE indication informing the ATM MAC it may 
transmit on the connection. Connection management 
starts its idle timer for the connection. 

The connection is now established on both sta- 
tions. One or more MAC UNITDATA SDUs have been deliv- 
ered. The connection will be timed out as per local 
policy decisions. 

ATM LAN Code Overview 

One detailed embodiment of computer software code 
used in connection with the present invention appears 
in the VIRTUAL NETWORK USING ASYNCHRONOUS TRANSFER 
MODE APPENDIX. 

The ATM LAN MAC code in the appendix is organized 
by functional components and Operating System (OS) 
dependencies. The file if_atm.c contains the rou- 
tines which contain OS dependencies and which are 
typically implemented differently for each OS. The 
unicast unit 25 and multicast unit 24 address resolu- 
tion functions are implemented in the file atmarp.c. 
The file atmarp.h contains the definitions for the 
ATM ARP protocol and the structures used by atmarp.c 
to implement the protocol. The file atm.c implements 
the function of connection management unit 27. Those 
routines interact with the ATM signaling function to 
establish and release connections. The framing unit 
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26 function is implemented in the OS specific file 
if_niu.c in the routines niuoutputO , atm_mac_input ( ) 
which encapsulate and decapsulate frames respective- 
ly. The station management unit 28 functions are 
5 implmenented in atm_init.c and in parts of the ATM 
signaling unit 28 in the files svc.c, svc_ utl.c and 
svcjpdu.c. The ATM LAN server unit 12 functions are 
implemented in the files Im.c, lm_cfg.c, lirwngmt.c 
and lm_util.c. 

10 In the APPENDIX the configuration management 

units 20 and 40 are implemented in an alternate 
embodiment wherein the operational unit 28 PDUs 
rather than in a switched VCs as previously describe- 
d. 

15 While the invention has been particularly shown 

and described with reference to preferred embodiments 
thereof it will be understood by those skilled in the 
art that various changes in form and details may be 
made therein without departing from the spirit and 

2 0 scope of the invention. 
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atm.c 
/* 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

V 
/* 

* This file contains: atm initO is called at initialization. 

* atmjind_atp0 retums"an atmif given a MAC and physical l/f. 

* atm_fint_macO returns an atmif given a MAC. atm_sdu_handlerO Is 

* the Interface to ATM signaling, atm releaseO releases a VC and 

* frees any queued packets, atm find" at() searches for an arptab 

* entry given a mac address, atm lnltlate_setupO Initiates VC 

* establishment. 

V 

static char sccsid[] = "%A%"; 

#lnclude "atnuh" 
#include "svch" 
#lnclude "debug.h" 
#lnclude "nlu.h" 
#lnclude "atmarp.h" 
#include "llch" 
#lnclude "if^atm.h" 

int atm trace = 2; 

#define TL1 T 
#defineTL2 atm trace >1 
#define TL3 atm Jrace > 2 
#define TL4 atm~trace>3 
#define TL5 atnTtrace>4 

Int atm_assert_panic « 1; 

#define HASHMA(x) HASH LOW((x)->aa long[1l) /* pass in a atm addr */ 
#define HASH_LOW(partO) (((partO> >8) / faart0))&0xf) /* pass in low 32 bits 

* of addr */ 

/* 

* atmJnitO is called to allocate atm glob which contains all the 
*^TM LAN MAC global variables wHich are written after program load. 

atm InitO 
{ " 

int i, atmjnac in put 0, atm_sdu handlerO; 

struct atm_globs *ag =~atm_glob; 

if (ag->atmjnltialized) 
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return 0: 
ag->atmlfn = NNIU * NATMS; 

ag->atmjjlp = ulp_register(LMI_MAC ORG, LMI_MAC_PID, 

atm__macjnput, atm_sdu handler, 0); 
((u short *f&ag->lic_def)[0] = Oxaaaa; 
((iTshort*) &ag->llc_def)[1] = 0x0300; 
((u short *) & ag->llcdef)[2] = 0x0; 
((iTshort *) & ag->llc def)[3] = 0x0; 
ag-">atm_null.aa longlb] = 0; 
ag- > atm_null.aa Jong [1 ] = 0; 
ag->atm_nu!l.aa_type = AATJslULL; 
ag->atnrTbroadcastaa long[0] = 0; 
ag->atm~broadcast.aaJong[1] = 0; 
ag->atm_broadcast.aa type = AAT MAC; 
for (i = 0; I < 6; ~ 
ag->atm broadcastaa_byte[ATM_FIRST_MAC + I] = 
(u_char) Oxff ; 

ag-> at reinitialized = 1; 
return; 



/* 

* atm_f!nd_atpO returns an ATM LAN structure pointer, atp, given 

* port address and a phys l/f. 
V 

struct atmlf * 
atm_find_atp(pc, port) 

struct pcif *pc; 

struct atm addr *port; 

{ 

struct atmif *atp; 

for (atp = pc->pc_atmif; atp; atp = atp->ati_next) 
If (ATM_ADDR_EQ(atp->ati_port, *port)) 
return atp; 
return (struct atmif *) 0; 



/* 

* atm fint atO returns a pointer to an atm interface entry to be 

* use? for a specific MAC address. 

V 

struct atmif * 
atm_find_mac(mac) 
u char *mac; 

struct atmaddr addr; 
struct pcif *pc; 
struct atmif *atp; 
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atm_bzero(&addr, sizeof(addr)); 
atm_bcopy(mac, &addr.aa byte[2], 6); 
addr.aajype = AAT_MACf 

for (pc = svc_glob->svc_pclf; pc < svc_glob->svcpclfn; pc++) 
for (atp = pc->pc_atmff; atp; atp = atp->atl next) 
ff (ATM_ADDR_EQ(atp- > atl_mac, addr)) 
return atp; 
return 0; 

} 

/* 

* atm_sdu handlerO handles signaling SDUs from the ATM signaling 

* module. The necessary ATM ARP routines are called at connection 

* establishement and release. 
V 

atm_sdu_handler(vp ( sdu, len) 
struct vcte *vp; 
struct setup *sdu; 
int len; 

{ 

struct ulptab *ulp; 
int rtn; 

struct vcte *ovp; /* other VC */ 

ASSERT(VAUD_VP(vp)); 

TR1 (TL2, "atm_sdu_handler(%s)\n", 

svc_xdu _type_str(sdu- > Imijxlujype)) ; 

if (vp->vcte flags & VCTEF MCAST_SERVER) { 
if (ulp m uipJind(LMI MCjAST PID f LMI MCAST ORG)) { 
ASSERT(VAUD_ULP(vp->vae_ulp)); " 
ulp_free(vp->vcte ulp); 
ulp_tax(ulp); 
vp->vcte_ulp = ulp; 
(*ulp->ulp Iml) (vp, sdu, len); 
} else 

atm_release(vp, INVAUDJ3STADDR); 
return; 

} 

switch (sdu->lml pdu type) { 
case SDU SETUP IND: 
if (lsvc flndjocai port(vp->vcte_pcif t 

^((struct setup *) sdu)->lmi_callee)) { 
atm_release(vp, INVAUD DST_ADDR); 
break; 

} 

ASSERT(vp->vcte atmif 0); 
vp->vcte_atmif = atmflnd atp(vp->vcte_pctf, 

~ &vp->vcteJocal); 
ASSERT(VAUD ATP(vp->vcte atmif)); 
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ovp = svc_find_vc(vp->vcte_pclf, &vp->vcte_local. 
&vp->vcte peer, atm g!ol»atm ulp, 
VCS NOT I5EAD OR DYING & ~fl << VCS WSR)); 
If (ovp &£ bcnr^(&vp->vcteJocal. 

vp->vcte_peer, sizeof (struct atm addr))) { 
If (atmJncomingj/cJs_better(vp, ovp)) { 
arp release(ovp->vcte atmlf->atl_arptab, ovp); 
atnrT reiease(ovp, VC ffEDUNDANT); 
} else! 
atmjfree msg(sdu); 
atnTreiease(vp, VC REDUNDANT); 
break; 

} 

} 

sdu->lmijxlu type = SDU SETUP RESP; 
ff (rtn = svc s3u(vp->vcte_pcif, vp,"sdu t 
sizeof(struct setup))) 
TR1(TL2, 1, svc_sdu(SETUP - RESP)->%d\n M l rtn); 
break* ~" 
case SDU SETUP_COMP: 
ff (bcmp{&vp->vcteJocal, vp->vcte_peer, 
sizeof(struct atm addr))) 
arp_setup(vp->vcte atmif->ati arptab, vp); 
case SDU_SETUP CONF: 
atm_free_msg(s3u) ; 
if (vp->vcte packet) 

atm_send~ packets(vp) ; 
breakf 
case SDU_RELEASE IND: 
if (vp->vcte_packet) 

atm _f ree_packets(vp) ; 
arp_release (vp- > vcte_atmff- > ati_arptab, vp) ; 
atm free_msg(sdu); 
break; 

case SDU_STATUS_RESP: 

atm_free_msg (sdu) ; 

break; 
default: 

panlcfunknown sdu"); 

break; 



atm_incoming_vc Is betterO choses the better VC given two 
redundant VCs. We (Fmlt the number for VCs to one between every 
pair of ports. When a new VC Is Initiated we check for a 
duplicates. The VC Initiated by the station with the lowest port 
address is released. It is imperative that both sides use this 
algorithm otherwise we could end up in a deadly embrace. 
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V 

atm incoming vc Is betterflvp, ovp) _ 
struct vcte ~ *ivpf/* incoming VC */ 
struct vcte *ovp; /* outgoing VC (we initiated) */ 

struct atm addr *ours, *theirs; 
Int " true; 

ASSERT(ovpl = Ivp); 

TR2(TL3 t "atm_sdu_handlen dup vcs found %x & %x\n", Ivp, ovp); 
if (ivp->vcte_pclf->pcjiags & PCIFJWU_TOJsllU) { 
/* compare MAC addresses */ 

true = lvp->vcte_pcif->pcflags & PCIFJ3THERJWACADDRJS_HIGHER; 
} else { /* compare port addresses */ ~" ~ ~ 

true = ATM_ADDR_GT(ivp->vcte_peer, ivp->vcte_locaI); 

TR2(TL3, "atm incomlng_vcJs%sJbetter(%s) \n", 
true ? : "jiot", el60_ntoa(&lvp->vcte_peer)); 
ASSERT(ovp) ; /* keep ovp alive */ 
return true; 



/* 

* atm_releaseO sends a release req to the svc module and frees any 

* queued packets. 

V 

atm_release(vp, cause) 
struct vcte *vp; 

{ 

struct release *rdu; 
Int rtn; 

If (vp->vcte_packet) 
atmjree_packets(vp) ; 

if (!(rdu = (struct release *) atm_allocjmsgO)) { 
printffatmj'elease: no memory - ); 
return; 

} 

rdu->lmi_proto = LMI PROTOCOL; 
rclu->lmi_pdu_type « "5DU_RELEASE REQ; 
rdu->lmi_cref type = vp->vcte_cref type; 
rdu->lmrcrer value = vp->vcte cref value; 

LMI_SET_EL£MENT(&rdu-> Imi cause, LMI RELEASE_CAUSE, cause); 
if (rtn = svc sdu(vp->vcte_pciCvp f rdu, slzeof(*rdu))) 
TR1 (TL1 , "atmj-elease: release failed %d\n' l rtn); 

/* 
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* atm_find atO searches for an arptab entry given a mac address. 

* The 'besf entry upon which to send to the mac address is 

* returned. If the entry has no VC this routine attempts to setup 

* one. 

V 

u_char atm_macbroadcastaddr[6] = {Oxff, Oxff, Oxff, Oxff, Oxff, Oxff}; 

struct aate * 
atmjind_at(atp, dst) 

struct atmif *atp; 

u char *dst; 
{ " 

struct vote *vp = 0; 
struct aate *at; 



ASSERT(VAUDATP(atp)); 

at = atm_mac_to_aate(atp, dst); 
If (!at) /* we queue frames now... 1 1 
* !at->aate_vcte) */ 
at = atm mac to aate (at p, atm macbroadcastaddr); 
If(lat) " 

return 0; 
If (!at->aate_vcte) 

atmjnrtiate_setup(atp, at); 
return at; 



/* 

* atmjnitiate_setupO initiates a vc setup between to the port 

* addresses using the specific interface. If there is already a vc 

* coming up between the two ports using that interface we do not 

* bother. This huarantees that we do not Initiate two VCs to the 

* same port address. When we get setup indications we must also 

* check for duplicates and decide which VC to keep. 
V 

atm_initiate_setup(atp t at) 
struct atmif *atp; 
struct aate *at; 

{ 

int rtn; 

struct pcif *pc = atp->ati_pcif; 
struct atm_addr *from = &atp->ati_port; 
struct vcte *vp; 

struct setup *pdu; /* setup pdu and sdu are the same */ 
struct lml_ulp *lu; 

If (pc- > pc_sig- > vcte_state != VCS_ACT1VE) 
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/* no signaling yet */ 
return 0; 

vp = svcfind_vc(pc, from, &at->aate atmaddr, 

atm_glob->atm ulp, VCS NOT DEAD OR DYING); 
If (vp) " " " 

goto found_a_vc; 

pdu = (struct setup *) atm alloc msgO; 
if (Ipdu) 
return 0; 

pdu->lml_proto = LMI_PROTOCOL; 
pdu->lmi_ncaJis = 1; 
pdu->!mf_caller = *from; 
pdu->lmi_callee = at->aate_atmaddr; 
pdu->lmljxlu type = SDU SETUP REQ; 
pdu->lmi cref"type = LMI ^REFTYPE SVC; 
pdu->lmi_crefvalue = 0;/* let svc module pick one */ 
lu = (struct ImT ulp *) & pdu[1]; 
lu->af type = CMlJJLP; 
lu->afaal = PAYLOAD AAL 4; 
lu->af_pid = LMI MAC PID;~ 
lu->af_org = LM~MAC_ORG; 

If (rtn = svc sdu(pc, 0, pdu, sizeof(*pdu) + slzeof(*lu))) 

TR1(TL2, ^tm Initiate setup: svc_sdu->%d\n" f rtn); 
vp = svcjind_vc(pc f from, &at->aate atmaddr, 

atm_glob->atm_u!p, VCS NOT DEAD OR DYING); 
found a vc: ~ - — - — 

if (vp)l 
at->aate_vcte = vp; 
vp->vcte_atmif = atp; 
svc_lnc(vp); 

TRi (TL1 , "atm find_at: setup to %s fafled\n", 
e1 60_ntoa(&at-> aatejrtmaddr)) ; 

} 
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/* atm.h 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

V 

#lfndef NIU ATM H 
#deflne NIU~ATMlH Included 

#lnclude "bytes.h" 
#lnclude ■unlpdu.h* 

/* 

* atm mac service interface (asl). This Is the same as an ethemet 

* header so that upper layers can simply assume ATM is an ethemet. 

V 

struct atmmsl { 
u_char asl dst[6]; 
u_char asrsrc[6]; 
u_short asftype; 

}; 

/* 

* Structure of an ATM mac header for aal type 4, this is an 602.6 

* header. 

V 

struct atm_header { 
struct atm_addr atm_dst; 
struct atnrTaddr atm~src; 
union { 



struct { 




u int 


mcb_pid:6; 


u"int 


mcb_pad:2; 


u~int 


mcb delay:3; 


u~int 


mcbJoss:l; 


u int 


mcb crc:1; 


u int 


mcb_elen:3; 


ulnt 


mcb pad1;16; 


} " 


mcbits; - 


ujnt 


atnwncbjong; 




un mcb; 



}; ■ 

#define atm_mcbits unjncb-atmjricb long 
#define atm_elen un mcb.mcbits.mcB elen 
#define atm_crc un~mcb.mcbits.mcbjcrc 
#define atmjoss un~mcb.mcbits.mcb~loss 
#define atm_delay un_mcb.mcbfts.mctiTdeIay 
#define atm_pld un~mcb. mcbits. mcb~pid 
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#define ATM PID LLC 1 /* protocol ID for LLC */ 
#define ATM" MCBiTS NOCRC 0x04000000 /* protocol Id 1 */ 
#define ATM~"HDR l£fi sizeotfstruct atm header) 
#define ATM~PADJSHIFT 24 

/* 

* The only header extension defined is a return port address. The 

* length must be set to ATME_RPA SIZE. Pad exists to get the 64 bit 

* address 64 bit aligned relative to the atm header. 
V 

struct atmheaderext { 
u_char atmejen; 
iTchar atme_type; 

u~char atme pad [2]; /* need not be zeros (nnbz) */ 
struct atm addr atmejpa; /* return port address */ 

}: 

#define ATME RPA TYPE 112 /* out of SMDS range */ 
#deflne ATME "ftPA BYTES sizeof(struct atmjieader_ext) 
#define ATME^RPAl/VORDS ((slzeof(struct atm_header_ext) +3)/4) 

/* 

* Callers to atrndata reqO must ensure atleast ATMJDATA REQ ROOM 

* bytes are available in front of the packet data. 
V 

#define ATM_DATA_REQ_ROOM (ATM^HDR^LEN+LLC^SNAP^LEN+ATME^RPA^BYTES) 
/* 

* multicast address structures are linked to atm_arptabs which are 

* marked ATF_MULTI. Such entries are not timed out, nor are they 

* freed when underlying VCs are released. atm_delete lanO tree's 

* the ATF_MULTI atm_arptab entries and atmadd lan(J & 

* atm_niujo_niu() re-allocate them and re Initiate BlC VCs for the 

* registered addresses. 
V 

struct mcaddr { 
u_char mc_enaddr[6]; /* multicast address */ 
u_short mc~count; /* reference count */ 
struct aate *mcTat; /* multicast VC */ 

}; 

#define MCADDRMAX 64 /* multicast addr table length */ 
#define MCCOUNTMAX (32*1024-1) /* multicast addr max 
* reference count */ 

^atmif, one per atm Ian, used by atm ian layer 
struct atmif { 
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struct niu_arpcom *atl_ac; /* contains arp and ifnet 

* structures */ 

struct atmlf *ati_next; /* linked off pcff structure */ 
u_short atl_state; /* basically do we know who 

* we are */ 

u_short ati_mld;/* mid used for multicast frames */ 
u_short ati_mcasts; /* max # multicasts circuits 

* configured */ 

struct atm_addr atl port; 
struct atm_addr atl'mac; 
#define ac_mac "ati_mac.aa_byte[21 

struct pelf *atl_pcif; 

struct aate *ati_arptab; /* set at initialization */ 

Int atl_num_mcasts; 

struct mcaddr ati_mcaddrs[MCADDRMAX]; 



/* ati state * / 

#define ATS INACTIVE 0 

#define ATS_ACTIVE 3 

/* 

* global data structure for r/w variables and variables explicitly 

* initialized. 

V 

#include "Hah" 

struct atm_globs { 
struct ifjtr hdr *ltrb; 
struct atmff *atmif; 
int atmifn; 
int atmif_used; 
struct llc_snap llc_def; 
struct atm_addr atm_broadcast; 
struct atm_addr atm null; 
struct ulptab *atm Dip; 
int atmjniflaiized; 
char statlc_buf[32]; 

}; 

#ifndef RT68K 

extern struct atm_g!obs atm_g!obs; 
#define atm glob (&atm globs) 
#else 

#define atm__glob atm get globO 
struct atm_globs *atrn"gerglobO; 
#endif ~ " 
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#deflne LEN_FOR_MBUF_PTRS 0xf5560002 

#define HASH_MULTICAST_ADDRESS(x) ((x)&0xff) 

caddr t atm alloc msgO. atm alloc bytesO: 
#define NATMS "4 / r max # of ATM lans per physical 
* Interface */ 

#define ei60_ntoa svc_el64_ntoa/* these are really E.164 addresses */ 
#endlf /* NIU_ATM H */ 
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/* atm Init.c 
* 

* COPYRIGHT 1 992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 



* This file contains the ATM LAN configuration routines. They are 

* called by the ATM signaling module when signaling enters the 

* ACTIVE state and one or more ATM LANs have been provisioned 

* "added* by NM and they are called when signaling transitions to 

* the WGRC state to -deleted - the ATM LANs. 

* atm_attachjan() allocates atmff structures and Initializes them. 

* atm_addjan() actives an ATM LAN Initiates, atm deletejan() 

* deactivates an ATM LAN. atm_niu_to_n!u() activates an ATM LAN in 

* back to back configuration. atm_trace_buf() add a trace record to 

* the trace buffer, atm trace str() add a string to the trace 

* buffer. 

V 

static char sccsid[] = m %A% m ; 

#include "debug, h" 
#include "niu.h" 



#include "atm.h" 
#include "atmarp.h" 
#indude "svah" 
#include "debug.h" 
#include "trace.h" 
#include "ff_atm.h" 

#define TL1 1 

#define TL2 atm_trace> 1 

#define TL3 atm_trace>2 

#define TL4 atm_trace>3 

#define TL5 atm_trace>4 

extern int atm_trace; 

/* 

* atm_attachjan0 is called when the maximum number of ATM LANs for 

* a particular plysical interface is known. The appropriate number 

* of atm Ian interface structures are allocated and linked Into the 

* physical interface structure. 

V 

atm_attachjan(atp. pc) 
struct atmif *atp; 
struct pcif *pc; 

struct atmif *an; 
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If (an = pc->pc atmlf) { 

while (an->atfnext) 
an = an->atl_next; 

an->atl next = atp; 

atp->at[_next = 0; 
} else { 

atp->ati next = 0; 

po->pc "atmlf = atp; 

} 

atp->atijpclf = pc; 

ASSERT(atp->atl state -« ATS INACTIVE); 

tf_set_mac(atp); 

atm_arptab alloc(atp); 

atmJ}zero(atp->atl_mcaddrs ( slzeof(atp->atl mcaddrs)); 
atp->atl_num mcasts =1; 
atp->atl_mca3drs[0].mc_count = 1; 

atm_bcopy(&atm glob->atm_broadcastaa byte[ATM FIRST MAC], 

atp->ati mcaddrs[0].mc enaddr, 6); 
ff (pc->pcjiags & PCIF_NlU~TO_NIU) 
atm_niujo_niu(atp); 



r 

* This is called when a real switch tells use some real port 

* addresses. The mte's were freed when the previous Ian was 

* deleted. If the mtu is zero this is a null LAN. It should not be 

* made active. This allows users to configure interfaces starting 

* at aa2, aa3, etc. 
V 

atm_addjan(atp, port, mid, mcasts, mtu) 
struct atmif *atp; 
struct atm addr *port; 



{ 



} 



TR1(TL1, "atm add Ian: port « %s", 

el60 ntoa(&atp-">ati port)); 
if (mtu == 0) 
return; 

atp- > at instate = ATS ACTIVE; 
atp->ati__mid = mid; ~ 
atp->ati_mcasts = mcasts; 
atp->ati_port = *port; 
ff_addjan(atp, mtu); 
atm setup_mcasts(atp); 
TRlfTL2 t "atm add Ian: port = %s", 

6160 ntoa(5atpH>ati port)); 
TR1 (TL2T ' mac = %s\tf, e160 ntoa(&atp->ati_mac)); 
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atm_setup_mcasts(atp) 
struct atmlf *atp; 

{ 

int i; 
struct mcaddr *mc; 

for (I = 0; I < atp->atl_num mcasts; I++) { 
mc = &atp->ati mcaddrsfl]; 
ASSERT(mc-> mc_at == 0); 
mc->mc at = atm find_at(atp, mc->mc enaddr); 
ASSERT(mc-> mcjat); 
mc->mc_at->aate_flags |= ATF_MULTI; 
TR1{TL3r - atm setup_mcast: port = %s\n" l 
e 1 60_ntoa(5mc- > mc_at- > aate_atmaddr)) ; 

} } 

r 

* Called to free up any resources tied up by the ATM LAN, atp. The 

* arptab has been cleared by release indications except for 

* ATF_MULTI entries. Here we go through list of registered 

* multicast addresses free those arptab entries refernced. 
V 

atm_deletejan(atp) 
struct atmlf *atp; 

{ 

struct mcaddr *mc; 

atp->ati_state = ATS INACTIVE; 
TR1(TL1, "atm deleteHan: port = %s", 

e 1 60_ntoa (&atp- > ati_port» ; 
TR1(TL1 ( " mac = %s\n", e160_ntoa(&atp->ati mac)); 
atp->ati_porLaa_type = AAT NULL; 
for (mc = atp->ati_mcaddrsr 

mc < &atp->ati_mcaddrs[atp->ati_num_mcasts]; mc++) { 
ASSERT(mc-> mc_count); 
If (mc->mc at) { 
ASSERT(mc->mc_at->aateJlags & ATFJVIULTI); 
mc-> mc_at- > aatejiags = 0; 
atm_aate_f ree (mc- > mc_at) ; 
mc->mc at = 0; 

> 

} 

if_deletejan(atp); 



/* 

* set a local port address and mac address based upon mac address in 

* niu_arpcom referenced by atp. This is used when changing atm Ian 

* configuration to a niu-to-niu configuration. Also set to 
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* broadcast mte entry and if signaling not debugged Install a nailed 

* up broadcast vc. 

V 

atmjilu_to_niu(atp) 
struct atmlf *atp; 

{ 

extern Int gosig, nlumtu; 

atm_bzero(&atp->atl_port f sizeof(atp->ati port)); 

atp->ati_portaa_type = AAT PORT; 

atm bcopy(&atp->atl_mac.aa^byte[ATM FIRST MAC], 

Satp->atl portaa byte[ATM_N2N MAC], 6)7 
atp->ati_poitaaJannum = If get lan(atp); 
atp->ati_state = ATS ACTIVE; 
atp->ati_mcasts = 32; /* its arbitrary */ 
atp->ati_mid = 0; /* must be zero till ALAN aal driver 

* gets fixed */ 
if_addjan(atp f 0); /* do not change mtu */ 
atmsetup mcasts(atp); 
TR1(TL2, "atm niujto nlu: port = %s", 

e1 60_ntoa(5atp- > ati_port)) ; 
TR1(TL2, " mac « %s\n M , e160 ntoa(&atp->ati_mac)); 



svc_trace_pdu(p, len, in, vcO 
char *p; 

atm_tracej>uf(p, atm_bcopy, SVC^PDUJTRACE, ten, in, vci); 



/* 

* atm_trace_bufO add a trace record to the trace buffer. 
V 

int atm_tracejimit « 64; 

atm_trace_buf(p, copyproc, sub, tlen, in, vcl) 
caddrjt p; 
int " (*copyproc) 0; 

struct ifjrjidr *rb; 
Int s, len; 

if (tlen > atmjrace limit) 

len = atmjrace limit; 
else 

len = tlen; 

rb = (struct ffjrjidr *) tr_get entry (sizeof *rb + len); 
atm glob->ltrb = rb; ~~ 
if (irb) 
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return; 

rb->thdr. subsystem = sub; 
rb->thdr.sss * In; 
rb->thdr.length = len; 
rb->tien = tlen; 

atm_settime(rb->thdr.tlme); 
rb->vcl = vcl; 

(♦copyproc) (p, (char *) &rb[1], len); 



/* 

* atm trace strO add a string to the trace buffer. 

V ~ " 
atm trace_str(str) 
cFar *str; 

{ 

struct tracejieader *tn 
Int len; 

for (len = 0; strflen]; len+ +); 

tr = (struct trace header *) tr get entry(slzeof *tr + len); 
if(ltr) ~ - - 

return; 

tr-> subsystem = ASCIIJ-OG; 
tr->sss = 0; 
tr-> length = len; 
atm_settime(tr- > time); 

atm_bcopy((u_char *) str, (u char*) &tr[1], len); 
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/* atmarp.c 



* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 



* 



* ATM address resolution protocol This module contains the routines 

* which implement atm arp. The two primary entry points are 

* atm_macto_aate() and atm_arp_lnput(). 

* atnrwnac to_aateO returns a pointer to and atm arp table entry. 

* atm_arpjhput() handles all atm arp requests and replies. 



static char sccsld[] = "%A%"; 

#ifdef notdef 
#include -alLh" 
#lnclude u ip erre.h" 
#include "unsp.h M 



#include "atm.!!" 
#include "svc.h" 
#include "atmarp.h n 
#include "debug.h" 
#include "if_atm.h" 

#define TL1 1 
#deflne TL2 arpjrace> 1 
#define TL3 arp_trace>2 
#define TL4 arp_trace>3 
#define TL5 arp_trace>4 
int arp_trace = 2; 

Int arp_debug = 2; 

char *atm mac sprintfO; 

#define N_AATE~S 64~ 

struct aate atnf aate[N_AATE_S * ATMARP TABLES]; 
Int atm_aate_size = N AATE S * ATM"ARP TABL 

Int atmarptabs = 0;/ r number of tables allocated 

* atm Ian) */ 



struct aate * 
atm_arptab look(atp, addr) 
struct atmif *atp; 



#endif 



/* notdef */ 



u char 



*addr; 



{ 



struct aate *ate = atp->ati_arptab, *end; 
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end - &ate[N_AATE_S] ; 
while (ate < end) { 
If (atm_bcmp(ate->aate_macaddr, addr, 
sizeof (ate- > aate_macadd r) ) == 0) 

return ate; 
else 
ate+ + ; 

} 

return 0; 



r 

* Broadcast an ATM_ARP packet, asking who has addr on atm Ian ac. 
*/ 

atm arprequest(atp, addr) 
struct atmff *atp; 
u char *addr; 



{ 



struct atm_arp *aa; 

TR2(TL3, "atm_arprequest(%x, %s)\n M , atp, 

atm_mac_sprintf(addr, 6)); 
aa = (struct atm arp *) atm alloc msgfl; 
K(laa) " " 

return; 

aa->aajlp = htons(ARPHRD ATM); 

aa->aa_ulp = htons(ETHERT?PE_ATMMAC); 

aa->aajlpjen = slzeof(aa->aa_sender_port); 

aa->aa~ulpjen = sizeof(aa->aa_sender mac); 

aa->aa_msg_type = htons(ATM_ARP REQUEST); 

atm bcopy((caddr_t) & atp->ati_poit, (caddr_t) aa->aa_senderj3ort, 

fujnt) sizeof(aa->aa_sender_port)); 
atm bcopy((caddr_t) & atp->ac_mac, (caddr t) aa- > aa_send er_mac t 

ftijnt) sizeof(aa->aa_sender_mac)); 
atm bcopy((caddr_t) addr, (caddr t) aa->aa_target mac. 

ftjjnt) sl2eof(aa->aa_target mac)); 
atm_bzero((caddr_t) aa->aa target port, sizeof(aa->aa target_port)); 
atm_send_arp(atp, addr, aa,"sizeof(*aa)); 



r 

* atm_mac_to_aate() returns a pointer to and atm arp table entry. 

* desten Is filled In. If there is no entry In arptab, set one up and 

* broadcast a request for the MAC address. An arptab point Is 

* returned If an existing arptab entry was found, for the mac 

* address Is found (or computed). 
*/ 
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struct aate * 

atm_mac_to aate(ac, destmac) 
struct atmF *ac; 
u char *destmac; 

{ ~ 
struct aate *at; 



TR2(TL4, "atm mac to aate(%x, %s)\n", ac, 

atm_mac sprintffaestmac. 6)); 
at = atm arptab iook(ac, destmac); 
ff (at = =7>) { 7* not found */ 

at = atm aate ailoc(ac~>ati arptab, destmac); 

If (at =="0) ~ 

panicfatmjrac_to_aate: no free entry"); 
if (!atm_bcmp(destrnac, &ac->ac mac, 6)) { 
atm bcopy((caddr t) & ac->atfport, 

Tcaddr t) & at- > aate atmaddr, 

(uJrit)"slzeof(ac->atTport)); 
atm bcopy((caddr_t) & ac->ac_mac, 

Icaddr J) at->aate macaddr, 

(u Jnt) "sizeof (at- > aatejnacaddr)) ; 
at- > aate timer = 0; 
at->aate~flags = AATF COMPLETE; 
at->aate_vcte = 0; 
TR2(TL4, " -> %x %s\n", at, 

svc_e1 64_ntoa(&at->aate_atmaddr)); 
return at; 
} else If (destmac[0] & 0x1) { 

* Calulate a suitable atm address to make a 

* connection with for this multicast 

* address. 
V 

atmarpmhash(ac, destmac, 

(caddr t) & at->aate_atmaddr); 
atm bcopy(3estmac, (caddr_t) at->aate macaddr, 

Tujnt) slzeof(at->aate macaddr)); ~ 
at- > aate timer = 0; 
at->aate~flags = AATF_COMPLETE; 
at->aate~vcte = 0; /* no vcte get */ 
TR2(TL4, " .-> %x %s\n", at, 

svc e164 ntoa(&at->aate atmaddr)); 
return at; 

} 

/* 

* Generate an ARP request, AATF RESOLVING avoids 

* recursion. 

V 

at->aatejlags | - AATF_RESOLVING; 
atm_arprequest(ac, destmac); 
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at->aate flags &- -AATF RESOLVING; 
TR0(TL4, " -> 0\n"); 
return 0; 

} 

at->aate timer « 0; /* restart the timer */ 

If (at- > aate flags & AATF COMPLETE) { /* entry 13 complete */ 

TR2(TL4," 1i -> %x %s\nT at, 

svc_el 64_ntoa(&at- > aate_atmaddr)) ; 

return at; 

} 

/* 

* There is an aate entry, but no e164 address response yet 

* Avoid Infinite recursion by using the AATF_RESOLVING flag. 

* This is temporary. The port to rt68k will necessitate 

* restructuring which, hopefully, will remove the need for 

* this flag. 

V 

if (!(at->aate_flags & AATF RESOLVING)) { 
at->aatejlags | = AATF_RESOLVING; 
atm_arprequest(ac, destmac); 
at->aatejiags &= ~AATF_RESOLVING; 

TR0(TL4, " -> 0\n"); 
return 0; 

} 

/* 

* atm arp inputO handles all atm arp requests and replies. 
V " " 

atm_arpjnput(atp, aa, src) 
struct atmrf *atp; 
struct atm_arp *aa; 
u char *src; 

{ "~ 
struct aate *at; 

u_char target_mac[6] ; /* copy of target protocol 

* address */ 
struct atm_addr *sport; 

TR2{TL2, "atm_arpjnput(fram %s / %s)\n", 

atm_mac_sprintf (aa- > aa_sender_mac f 6), svc_e164jitoa(aa->aa_sender_port)); 

If (aa->aa_ulp 1= ETHERTYPE_ATMMAC) 
goto drop; 

/* make a copy of target mac for use later */ 
atm bcopy((caddr_t) aa->aa targetjnac, (caddrj) targetjnac, 
Tujnt) sizeof(target_mac)7; 

if (!atm_bcmp((caddr_t) aa->aa_senderjnac, (caddM) & atp->ac_mac, 
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sizeof(aa->aa_sender mac))) 
/* its from me so just drop It */ 
goto drop; 

/* 

* Search the local database for senders mac address. Update 

* the database with new Information (first deleting old 

* Infomatlon). 

V 

at = atm_arptabJook(atp, aa->aa sender mac); 

* (at) { /* If It is complete and* address is 

* different then free entry */ 
if (at->aate_flags & AATF COMPLETE) { 
If (atm bcmp (aa- > aa_sender port, (caddr t) & at->aate atmaddr, 
(ujnt) sizeof(aa->aa sender port)) N 0)1 /* if different */ 
atm_aatejree(at); ~ 
at = 0; 

} 

> else { /* If at is incomplete update it */ 
atm_bcopy((caddr_t) aa->aa sender_port, (caddr t) & at->aate atmaddr, 

slzeof(aa->aa sender port)); 
at->aate_flags | =~AATF_COMPLETE; 

} 

/* 

* If we did'nt find his mac address and he IS looking for 

* us. Then learn his as well 

• V 

if (at = = 0 && latm_bcmp(target mac. &atp->ac mac, sizeof(target mac))) { 
/* ensure we have a table entry */ " ~ 1 

If (at = atm_aate_alloc(atp->ati_arptab, aa->aa sendermac)) { 
atm bcopy((caddrj) aa->aa~sender port, (caddr t) & at->aate atmaddr, 

(ujnt) sizeof(aa->aa_sender port)}; 
at->aatejiags | = AATF_COMPLETE; 

y 

y 

/* 

* If we found his mac address and his mac address is NOT the 

* same as the guy we got this frame from, then set 

* AATF PROXY. 

V " 

if (at && atm_bcmp((caddr t) src, (caddr t) aa->aa sender mac, 
(ujnt) sizeof aa->aa sender mac]) ~ ~ 

at->aate flags | = AATF PROXYf 
reply: 

/* 

* Make sure that you are trying to resolve a MAC address vs 

* some other type of address. 
V 

if (aa->aa_msg_type 1= ATM_ARP_REQUEST) 
goto drop; 
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If (latm_bcmp(target mac, &atp->acjnac, (ujnt) sizeof(target_mac)) 1 1 
atm mac learned" on non atm interface(target mac)) 

~ ~ 

* Either we are the target of the arp request or we 

* found the target mac address is in our forwarding 

* database and it was learned on a non-ATM interface 

* so we send a proxy atm arp response because the 

* atm arp request can not be forwarded onto that 

* link. 
V 

sport = &atp->ati_port; 
else 
goto drop; 

/* 

* We have decided to respond. Turn the request into a 

* response by copying the sender's port address into the 

* target port adr. Copy the senders protocol (MAC) address 

* Into the target address. Copy the target protocol address 

* (target_mac) into the senders protocol address and copy 

* the port selected above into the senders port address. 

V 

atm bcopy((caddr_t) aa->aa_sender port, (caddrj) aa->aajargetj3ort, 

fajnt) sizeof(aa->aa_sender_port)); 
atm bcopy ((caddrj) aa->aa_sender mac, (caddrj) aa->aajargetjnac. 

Tujnt) sizeof(aa->aa sender mac)); 
atm bcopy((caddr_t) target jnacT (caddrj) aa->aa_senderjnac, 

Tujnt) sizeof(aa->aa_sender mac)); 
atm bcopy ((caddrj) sport, (cad3rj) aa->aa_senderj>ort, 

Ju int) sizeof(aa->aa_sender_port)); 
aa->aajnsgjype « htons(ATM_ARP_REPLY); 

/* go ahead and send It */ 

atm_send_arp(atp, (caddrj) aa->aajargetjnac, aa, sizeof(*aa)); 
return; 
drop: 

atm freejnsg((char *) aa); 
return; 

} 

/* 

* atm_arptab_al!ocO allocates an atm arp table'for the atmff 

* structure atp and schedules the first first timeout for that atm 

* arp table. Each atm arp table has uts timeouts scheduled 

* separately. This is an attempt to spread signaling traffic out 

* when there are multiple LANs. Zero is returned if no table could 

* be allocated. 

V 
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struct aate * 
atm arptab alloc(atp) 
struct atmlf *atp; 



{ 



struct aate *at; 

at = &atm aate[N AATE S * atm arptabs]; 
If (atm_arpfeabs == ATM~ARP TABLES) 

return 0; 
atp->ati_arptab = at; 
atm_sched Jimeout(atp) ; 
atm_arptabs+ + ; 
return at; 



/* 

* atm aate freeO is called when an atm arp table entry Is no longer 

* In use. If a VC is referenced Its reference count is decremented. 

* If the VC's reference goes to zero atm releaseO is called to 

* release the VC. 

V 

atm_aate_free(at) 
struct aate *at; 

{ 

TR2(TL3, "atm_aate free(%s / %s)\n", atm mac_sprintf(at->aate macaddr, 6), 

svc_e164 ntoa(£at->aate_atmaddr)); 
ASSERT((at-> aate Jags & AATF MULTICAST) ==0); 
at->aatejmer = at- > aate flags~= 0; 
If (at->aate vcte && (svc_cfec(at->aate vcte) == 0)) 

atm _release(at- > aate_ycte, VCJDLEj; 
at- > aate vcte = 0; 

} 

/* 

* Enter a new address in aate, pushing out the oldest entry from the 

* bucket If there is no room. This always succeeds since no bucket 

* can be completely filled with permanent entries (except from 

* atmjarpiocti when testing whether another permanent entry will 

* fit). 

struct aate * 
atm_aate alloc(at, addr) 

struct aate *at; /* base of aate table for this Ian */ 

u char *addr; 

{ 

Int hlwater = 0; 

struct aate *victum = 0, *end = &at[N_AATE_S]; 
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TR1(TL3 P 'atm aate aIloc(%s)\n", atmjnac sprlntf(addr, 6)); 
while (at < end) { 
tf (at->aate_flags ==0) 

goto found; 
If ((at->aate flags & AATFMULTICAST) - - 0 
&& (at- > aate timer > = hiwater)) { 
hlwater = at->aate timer; 
vlctum = at; ~ 

} 

at+ + ; 

} 

If (Ivictum) 
return 0; 
at = victum; 
atm_aate_free(at); 
found: 

atm bcopy((caddr_t) addr, (caddr_t) at->aate macaddr, 

Tujnt) sizeof(at->aate macaddr)); 
at->aate_flags = AATFjrlUSE; 
at- > aate vote = 0; 
return (atj; 



/* 

* atmarphashO - algorfthmlcly generates an ATM multicast address 

* from a 48 bit address, if the number of multicast circuits 

* supported on this LAN (ati_mcasts) is 0 then use all 48 bits of 

* the MAC multicast address. The asumption being the network is 

* providing multicast service via a server with no limit to number 

* of multicast connections available to each station. If ati_mcasts 

* is greater than zero then the 48 bit address is folded into a 

* unsigned 32 bit integer by exclusive orMng the first 2 bytes into 

* the last two bytes. The resulting integer is divided by ati_mcasts 

* and the resulting number is used as the ATM multicast address. 
V 

atmarpmhash(atp, mac, port) 
struct atmif *atp; 
u_char *mac; 
struct atm addr *port; 

{ 

port->aajong[0] « 0; /* clear first word of address */ 
if (atp->ati_mcasts == 0) { 

atm_bcopy(mac, &port->aa_byte[ATM FIRST MAC], 6); 
} else { 

port->aa long[1] - ((mac[2] << 24) | 
((rhac[3] ~mac[l]) << 16) | 
((mac[0] ~ mac[4]) < < 8) | 
(mac[51)); 

port->aajong[1] %=s atp->ati_mcasts; 
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/* 

* This must be flipped In order to get It Into 

* network byte order 

V 

htonl(port->aa long[1]); 

port->aaJ)yte[ATMJ^RST_MAC] = 1; /* set multicast bit */ 

TR1(TL4, "computed mcast of %x\n\ port->aa long[1]); 
port->aajype = AATMAC;/* set the type flel? */ 



* arpsetupO is called when a new VC Is setup. The arptable is 

* searched for entries needing a VC to the peer port. Those entries 

* are updated to reference the new VC. 

V 

arp_setup(at, vp) 
struct aate *at; 
struct vcte *vp; 



{ 



} 



int |; 

TRl(TL2 t "atm_setup(%s)\n", svc_e164_ntoa(&vp->vcte_peer)); 

for (i = 0; i < N_AATE_S; I++, at++) f 
if (!(at->aate_flags & AATF_COMPLETE)) 
continue; 

If (!atm_bcmp(&at->aate atmaddr, &vp->vcte_peer f 
slzeof(vp-> vcte peer)) && 
at->aate_vcte 1= vp) { 
at->aatejvcte = vp; 
svcjnc(vp); 

} } 



/* 

* arp_releaseO is called when a VC is about to be released. The 

* arptable is searched for references to the VC. Any entries found 

* are freed. 

V 

arp_release(at, vp) 
struct aate *at; 
struct vcte *vp; 

int |; 

TR1(TL2, "arp releasees) \n". svc e164 ntoa(&vp->vcte peer)): 
for (I = 0; I <XAATE_S; l+ +. at+ +) f ~ 
if (!(at->aate_flags & AATFCOMPLETE)) { 
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ASSERT(at- > aate_vcte - = t>) ; 
continue; 

} 

If (at->aate_vcte I = vp) 

continue;" 
at- > aate vcte = 0; 
svc dec(vp); 

If ((at->aatejags & AATFMULTICAST) « 0) 
atm aate Tree (at); /* must clear aate vcte 
* first V 

else 

TR1 (TL2, "arp_release: skipped AATFJ/IULTICAST at=%x\n*\ at); 

} 

ASSERT(vp->vcte_refcnt == 0); 



Int atmarptimeol = 24; /* idle timeout */ 

Int atmarp_timeo2 = 3; /* incomplete timeout */ 

extern int hz; 

/* 

* atm arptimerO scans arp tables for active the ATM LAN atp. VCs ar 

* established fo registered multicast addresses if none exist. Atm 

* arp enrties for none registered addresses are timed out. When the 

* last reference to a VC Is freed that VC Is released (atm_aatejree 

* does this). 

V 

atm_arptimer(atp) 
struct atmif *atp; 

struct aate *at - atp->ati arptab, *end; 
int s; 

TR1(TL3, M atm_arptimer(%x)\n", at); 

atm_sched timeout(atp); 

if (atp->atfstate = = ATSJN ACTIVE) 

return; 
s = splimpO; 
end = &at[N_AATE_S]; 
for (; at < end; at++) { 

/* set up multicast circuits which have been released */ 

If ((at->aate_flags & AATF MULTICAST) && 
(at->aate_ycte == 0 \J 

((1 « at->aate vcte->vcte state) & VCS_DEAD OR DYING))) { 
atmjnftiate_setupfetp, at); 
continue; ~ 

} 

if (at->aate flags == 0 1 1 

(at->aatiflags & AATF_MULTICAST)) 
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continue; 
at->aate timer* +; 

If (at->aatefiags & AATF COMPLETE) { 
if (at->aafe timer >= atmarp_timeo1) 
atm aatejree(at); 
} else If7at->aate timer >= atmarp tlmeo2) 
atmaatejreefat); 



} 

spbc(s); 
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/* atmarp.h 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

#ffndef RT68K 
#lnclude "sys/types.h" 
#else 

#lnclude <stdlnth> 
#endtf 

/* 

* ATM Address Resolution Protocol (or ATM ARP) Definitions. 
V 

#define ETHERTYPE ATMMAC 0x0805 
#define ARPHRD ATM 16 

/* 

* ATM Address Resolution Protocol. 
V 

struct atm_arp { 
u_short~ aajlp; /* lower layer protocol */ 
u~short aa^ulp; /* upper layer protovol */ 
u_char aajlpjen; 
u~char aa_ulpjen; 
u_short aa_msg_type; 
u_char aa_sender_port[8] ; 
u_char aa senderjnac[6]; 

uchar aa~target_port[8] ; 
u char aa_targetjnac[6]; 

}: 

/* aa_msg_type' s */ 
#define ATM_ARP REQUEST 1 
#define ATM ARP~REPLY 2 
/* " " 

* MAC to ATM address resolution table, atm arp table entry, aate. 
V 

struct aate { 

struct atm_addr aate_atmaddr; /* port address */ 
struct vcte" *aate_ycte; /* vcte reference */ 
u char aate_macaddr[6]; /* mac address */ 
u_char aatejlmer, /* ticks*/ 
u char aatejlags; /* flags */ 

}; 

/* aate_flags field values */ 
#define AATF INUSE 0x01 

#define aatf "Complete 0x02 

#define AATF MULTICAST 0x10 
#define ATFjftULTI AATF MULTICAST 
#define AATF PROXY 0x20 



» 




• 
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#defina AATFJJESOLVING 0x40 

struct aate *atm aate allocO, *atm arptab lookO. *atm arpresolveO; 
struct aate *atm arptab allocO, *atmjlnd atO; 
extern struct aate atm aati[J; 
#define ATM ARP TABLES 16 
extern Int atm arptabs; 



» 
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/* bits.c 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

V 



#ifndef UNIX 

#define ERRLOG printdbg 

#deflne printf printdbg 

#endlf /* Ifndef UNIX */ 

#include <stdint.h> 
#lnclude "blts.h" 



bits_get bit(bfts, size) 

bits J* *blts; 

Int size; 

{ 

Int max_bit; 

int ret; 

int I; 

bits t mask; 



max bit = size * 8 * SIZEBITS; 
for (ret = 0; ret < max bit; ret+ +) { 
BITS GET I MASK(ret, i, mask); 
If ((blfs[i] S mask) == 0) { 
bits[i] | = mask; 
return (ret); 

} 

} 

return (-1); 



bits_tstj>it(bit, bits, size) 
int bit; 
bits J *blts; 
int " size; 

int ret; 
Int I; 
blts_t mask; 

BITS_GETJ MASK(bit, I, mask); 

ret = i < size && (bits[i] & mask) ! = 0; 

return (ret); 
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bits alloc bft(bit, bits, size) 
int " bit; 
bitsj *blts; 
int size; 

{ 

Int ret; 

Int |; 
bitsj mask; 

If (ibits tst_bft(bft, bits, size)) { 
BITS^GET I MASK(bit, i, mask); 
if (I < slzeJT 

bits[i] | = mask; 

return (-1); 
} else { 

return (0); 

} } 

return (0); 

} 

bftsjree_bit(bit, bits, size) 
Int ~ bit; 
bitsj *bits; 
Int "~ size; 



{ 



} 



int J; 
bitsj mask; 

BITSJ3ET l_MASK(bit, i, mask); 
if (i < sizef 

bits[i] &= -mask; 



print blts(bits, size) 
bits J *bits; 
int size; 

{ 

int |; 

for (i = 0; i < size; i++) { 
if (bits[i] = = 0) { 

piintffOxO "); 
} else { 

printf("0x%08x -, bitsH); 

} 

} 
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/* blts.h 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 
V 



#Kndef BITS H 
#define BITS^H 

typedef tUINT32 bits t; 

#define SIZE_BITS ~(sizeof(blts_t)) 

#define BITS GET I MASK(bit, i, mask) \ 
((I) = (bit) / (8 *"§IZE_BITS).\ 

(mask) = (bits t)0x80000000 > > ((bit) % (8 * SIZE BITS))) 



#endif 



/* ifdef BITS_H */ 



t 

\ 
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/* lf_atm.c 



* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 
* 

* This file contains the operating specific routine for the ATM LAN MAC 

* for UNIX. The routines defined here are: atm attachO is called 

* once per phys l/f at Initialization. 
* 

* ILset_macO Is called get a MAC address from the OS. 

* if_add JanO is notify the OS an ATM LAN is ACTIVE. 

* If_deletejan0 is notify the OS an ATM LAN is INACTIVE. 

* atm_free_packetsO Is called to free packets queued on a VC. 

* atm_append_packetO appends a packet on VC til It comes up. 

* atm_send_packets() Is called when a VC becomes established. 

* atm_settimeO Copy OS notion of time Into long array of 2. 

* atm schedjimeoutO schedule the OS to call atm_arptimer(). 

* svc_sched_timeoutO schedule the OS to call svcjimeoutO. 

* svcJnftO allocates global memory area for ATM signaling. 

* svcj-eportj/ersion conflictO report signaling version conflicts to 

* OS. ~ 
* 

* atm_alloc_msgO allocates a msg buffer large enough for signal PDUs. 
atm_free_msgO frees message memory pointed to by cp. 

* atm_alloc_bytesO is used to allocate memory for data structures 

* aal_send_msgO sends the pseclfied aal payload on a VC. 

* atm_send_arpO send a frame encapsulating In 802.6/LLC/SNAP type=ARP. 

* atm_macjnput0 handles aal payloads with 802.6 PDUs (ATM LAN). 
*^svc_macjnput0 handles aal payloads with SVC PDUs. 



* 
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static char sccsldf] = "%A%"; 



#tfndef (NET 
#define INET 
#endtf 
#include •../sys/pamm.h* 
#Include ",./sys/systm.h' 
#lnclude "../sys/mbuf.h" 
#include \./sys/socket.h" 
#include "../sys/errno.h' 
#include "../sys/locti.h" 

#lnclude "../net/if.h" 
#include "../net/netisr.h" 
#include "../net/route. h" 
#lnclude Vnet/ffjvp.rr 

#include "../sun/dpenprom.h" 
#include M ../sun4c/mmu.h" 

#ifdef INET 

#include ■../netlnet/ln.h" 

#include Vnetinet/in_systm.h* 

#fnclude "../netinet/in var.h" 

#include "../netinet/ipTh" 

#endif 



/* only support Internet addressing */ 



#lnclude B debug.h" 
#lnclude "niu.h" 
#include "unipdu.h" 
#lnclude "atm.h" 
#include "llc.h" 
#include "svc.h" 
#lnclude tt svc_utl.h" 
#lnclude "if_niuarp.h - 
#include "atmarp.h" 
#lnclude "If nlu.h* 
#lnclude "iTnlulo.h" 
#lnclude "rf_atm.h" 
#lnclude "sys/time.h" . 

Int atmj/vatchO; 
int svc_pcm = 1; 

extern Int atm trace; 
#defineTL1 1 ~ 
#define TL2 atm trace > 1 
#define TL3 atnrftrace > 2 
#deflne TL4 atm Jrace > 3 
#define TL5 atm trace > 4 



* 
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struct nlu_arpcom niu_arpcoms[NNIU* NATMS]; 

* atrnattachO Is called when the maximum number of allowed ATM LANs 

* for a specific Interface have been determined, atm nnlus must be 

* patched with the number of ATM LANs per physlcaflnterlace before 

* booting. Only that number of ATM LANs will be configured 

* regardless of ATM LAN configuration Information provldled by the 

* LMI configuration protocol. (We could dynamically attach and 

* dettach ffnet structures BUT the there is a significant 

* probability other code In the system assumes Ifnets are are static 
Rafter boot. So Hhets are statically linked once at boot) 

atm_attach(pc) 
struct pcff *pc; 



{ 



} 



struct ifnet *ifp; 
struct atmif *atp; 
Int Ian, ifunit; 

int niuoutputO. niusoioctIO, mac[2]; 

atm InttO; 

for (Tan = 0; Ian < pc->pc num lans; tan++) { 
ifunit = atm_glob->atmlTuse<r++; 
atp = &atm_glob->atmifpfunIt]; 
atp->ati_ac = &niu_arpcoms[ffunit]; 
niu_arpcoms[ifunit].ac_atmff « atp; 
Ifp = &atp->ati ac->ac If; 
ifp->lf_unlt = Ifunit; 

ff (niujnfo[pc->pc num].macaddr[0] 1 1 
niuJnfo[pc->p(fnum].macaddr[l]) { 

mac[0] = nluJnfo[pc->pc num].macaddr[0]; 

mac[1] = niuJnfo[pc->pc~numj.macaddr[l] + Ian; 

bcopy(((char *) mac) + 2,~ 

((struct niu_arpcom *) lfp)->ac enaddr, 6); 
} else 

niu get_enaddr(ifp.>lf_unlt l 

T(struct niu arpcom *) tfp)->ac enaddr); 
jfp->ff_name = "aa"; 
Ifp- > If mtu = pc- > pchwj-naxmtu; 
ffp->iTflags = IFF_BROADCAST | IFF NOTRAILERS; 
ffp->IHoctl = niusoioctl; 
ifp->if_output "« niuoutput; 
ifp->ff_promisc = 1; 
ffp->if_timer « 1; 

lfp->lf_snd.lfq maxlen = IFQ MAXLEN; 
lfp->if_watchdbg = atm watch; 
if_attach(ifp); 
atm_attachjan(atp ( pc); 
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} 

Int awl = 0; /* atm watch Interval, for those who 

* can not type */ 
Int awfttg[NNIU]; /* atm watch Interval ticks to go */ 

atm watch(ifunlt) 
irit Ifunlt; 

{ 

struct If net *ifp = (struct ffnet *) & nlu arpcoms[ifunlt]; 
Int iounlt = NIUJFUNITTO l<?UNIT(lfunlt); 

Int s; 

lfp->if timer = 1; 
If (ffunlt l= 0) 

return 0; 
If (awi = = 0) 

return 0; 
if (awittgfiounit] < = 0) { 

printf( M reseting unit %d from watchdog\n", lounit); 

s = splimpO; 

(*niujnfo[iounft]. reset) (lounit, 1); 
If (niuJnfo[iounlt].type = « NIU TYPE HW) { 
setup_rxbuf(&niuJnfo[iounit]JT 

splx(s); 

awittg [lounit] = awi; 
} else 

awittg [lounit]-; 
return 0; 



* set ati mac from value provided by os 

V 

if_set_mac(atp) 
"struct atmif *atp; 

bzero(&atp->ati mac, sizeof(struct atm addr)); 
mp->ati_mac.aajype = AAT MAC; 
bcopy(aTp->ati ai»ac enaddr, 

&atp->ati macaa T>yte[ATM FIRST MAC], 6); 



/* 

* If^add JanO is notify the OS an ATM LAN is ACTIVE, (and 

* conditionally set mtu size) 

V 

ff_addjan(atp, mtu) 
struct atmif *atp; 
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Int mtu; 

{ 

If (mtu && mtu <= atp->ati pclf->pc hw max mtu) 

((struct Ifnet *) atp->ati_ac)->if_mtu « mtu; ~ 
((struct Ifnet *) atp->ati_ac).>lfjags |= IFF_RUNNING; 

/* 

Mf_deleteJanO Is notify the OS an ATM LAN Is INACTIVE. 

If delete _lan(atp, mtu) 
"struct atmlf *atp; 

{ 

((struct ifnet *) atp->ati_ac)->lfjlags &= ~IFF_RUNNING; 

/* 

* convert os ifunlt to atmlf Index, this Is not called very often. 

V 

lf_getjan(atp) 
struct atmif *atp; 

{ 

int I; 
struct atmlf *atp0; 

for (i = o, atpo = atp->ati_pcrf->pc atmlf; 

atpO I = atp; ~~ ~ 

atpo « atp0->ati_next, i++); 
return I; 

} 

/* 

*^atm_free_packetsO is called to free packets queued on a VC. 
#lfndef KERNEL 

#define m freem(m) atm free msg(m) 
#endrf " " " 

atm_free_packets(vp) 
struct vcte *vp; 

struct mbuf *m - (struct mbuf *) vp->vcte packet; 
struct mbuf *m0; 

while (m) { 
mo = m->m_act; 
m_freem(m); 
m~"= mO; 

} 

vp->vcte_packet = 0; 
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/* 

* atm_append packetO appends a packet on VC til it comes up. (we 

* only" queue two packets) 

V 

atm_append_packet(vp, m) 
struct vcte *vp; 
struct mbuf *m; 

{ 

m->m_act = 0; 
If (vp->vcte_packet) { 
If (((struct mbuf *) vp->vcte packet) ->m_act 1= 0) { 
m_freem(m); 
return; 
} else 

((struct mbuf *) vp->vcte packet) ->m act = m; 
} else 

vp->vcte_packet = (caddrj) m; 
svc_glob->svcstat.queued frames+ + ; 
return; 

} 

/* 

* atm_send_packetsO is called when a VC becomes established. Any 

* queued packets are sent. 

V 

atm_send_packets(vp) 
struct vcte *vp; 

struct mbuf *m = (struct mbuf *) vp->vcte_packet; 
struct mbuf *m0; 

while (m) { 
mo = m->m_act; 

aal_sendjnsg(vp, vp->vcte atmff->atl mid, (caddr t) m, 

LEN_FOR_MBUF_PTRS) ; 
m = mO; 

} 

vp->vcte_packet = 0; 



r 

* atm_settimeO Copy OS notion of time Into long array of JL 

V 

atm_settime(t) 
struct timeval *t; 

{ 

extern struct timeval time; 
Int spl; 
spl = sp!7Q; 
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*t = time; 
splx(spl); 

} 



Int atm_arptimer(); 

int atm~arp_ms_per tick = 10000; /* once every 10 seconds */ 

/* 

* atrnschedjtimeoutO schedule the OS to call atm arptimerO. 

/ 

atm_sched tlmeout(atp) 
register struct atmlf *atp; 

#lfdef notdef 
/* I assumed top startjimerO takes seconds 77 */ 
tcp^startjimerf&^itp-^tmr^entry), 
atm_arp ms_per_tick / 10 ? ? ?, 
atm arpHmer, (caddr t) atp); 
#else " 

timeout(atm_arptimer, (caddr t) atp, 
atm_arp_ms_per_tick * ftz~/ 1000); 
#endlf 

} 

/* 

* returns true If we are forwarding frames out a specific non-ATM 

* interface. Otherwise returns false. 

V 

atm_macjeamed_on_non_atm interface(mac) 
caddr t mac; ~~ 

{ 

return 0; 

} 

/; 

* type^AR^^^ Send a frame enca P su,atin 9 ln 802.6/LLC/SNAP 

V 

atm_send_arp(atp, mac, msg, len) 
struct atmif *atp; 
caddrjt msg, mac; 

struct mbuf *m; 
struct sockaddr sa; 

m = dtom(msg); 
m->mjen = len; 
ASSERT(len < = MLEN); 
sa.sajami!y = AFUNSPEC; 
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((struct ether header *) sa.sa data)- > ether type «= 

ETHERTYPE_ARP; 
bcopy(mac, 

((struct ether_header *) sa.sa data)->ether dhost, 6); 
niuoutput(atp->ati ac, m, &sa); 



* aal_send_msgO sends the psecffied aal payload on a VC. Sends a 

* message, msg, of length, ien, byte on VC vp using multiplex-Id, 

* mid. If Ien is LENFOR MBUF_PTR then msg is a pointer to an mbuf 

* chain. Otherwise it is a pointer Into an mbuf. There should 

* probably be separate routines for this... 

V 

aal_send_msg(vp, mid, msg, Ien) 
struct vcte *vp; 
int mid; 
caddrt msg; 
Int Ien; 

{ 

struct mbuf *m; 
struct Ifnet *ifp; 
struct sockaddr aal sa; 



If (Ien = = LEN_FOR MBUF_PTRS) { 

m = (struct mbuf *) msg; 
} else { 

struct setup *pdu; 

pdu = (struct setup *) msg; 

TR1 (TL3, "aal_send: %s\n", 

svc_pdu_type str(pdu->lml pdu type)); 

if (pdu->lmi pdujype <= LMl^PDO LAST) 
svc_glob- > svcstat.pdus_sent[pdu- > lmi_pdu_type] + + ; 

m = dtom(msg); 

m->mjen = Ien; 

If ((pdu->lmi cref type | pdu->lmi cref_value) &&TL2) 
svc trace pdu(pdu, Ien, 0, vp->vcte ovpcl); 

} ~ ~ 
vcoutput(vp, m, mid); 



/* 

* atm_macjnput() handles aal payloads processing 602.6 & calling 

* LLC. Should be called at SPUMP. Called by dellverpacketO. 

* atm_datajnd0 Is called to process the ATM MAC header and get a 

* pointer to the LLC header. ilc_data_indO is called to process 

* the He frame. 
V 
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atnwnac input(vp, mO) 
struct mbuf *mO; 
struct vcte *vp; 

{ 

struct ffnet *Hp; 
structatm header *ah; 
struct llc_shap *lp; 
u char ~ *src; 
u~long *p; 
Int mac_hdrjen; 
Int promise « 0; 

Ifp = (struct Ifnet *) ((struct atmff *) vp->vcte_atmif)->atljac; 
if p- > If Jpackets + + ; 

DB1(DL4, *aa%d: atmjnacjnput\n" f ifp->IMjnit); 

ah = mtod(mO, struct atm header *); 
ASSERT((((uJong) ah) & 6x3) = = 0); 

if (mO->m_len < LLC LEN + ATM_HDR_LEN + ah->atm_elen * 4) { 
DB1(DL1, M aa%d: aim mac input short frame\n", lfp-> If unit); 
m_freem(mO); 
return ENOBUFS; 

} 

If (ah->atm_dstaa byte[2] & 0x01) { 
If (!niujindmultifvp->vcte_atmif, &ah->atm dst.aa_byte[2])) { 
promise = 1; 

> 

} else if (!ATM_ADDR_EQ(ah->atm_dst, vp->vcte atmif->ati mac)) { 
promise =1; ~ 

} 

lp = (struct lie snap *) ((caddr t) ah + ah->atm elen * 4 + 

sizeofpah)); 
macjidrjen « (caddr t) lp - (caddr t) ah; 
sre « &ah->atm_sraaa_byte[2]; 
If (rfp->if_promisc) /* assume nit interface is active */ 

niu_snitify 8026(ifp, mO, macjidr len, promise); 
If (promise) 

rnjreem(mo); 
else { 

m adj(mO, mac_hdr len); 

If fah- > atm pid != AtMPIDLLC) 

m_freem(mO); 
else 

Uc_datajnd(ifp, mO, sre, mac hdr len, lp); 

} " ~ 

return 0; 



/* 
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* svcmac inputO handles aal payloads with SVC PDUs. Note, SVC PDUs 

* must fit in one mbuf. Hence the limitation for 4 ATM LANs for 

* 4.2BSD UNIX implementations. This could be changed by using 

* clusters for PDUs. 

V 

svc_macjnput(vp, m) 
struct vcte *vp; 
struct mbuf *m; 

{ 

Int len = mjen(m); 

If (len > MLEN) { 
svc glob- > svcstat.pdu_too_blg + + ; 
m_freem(m); 
return 0; 

} 

m = m pullup(m, len); 
If (m = = 0) { 

svc_glob->svcstat.pdujost nomem++; 
return 0; 

} 

ASSERT((mtod(m, int) &3) == 0); 
if (m->m_next) { 

m_freem(m-> m_next); 

m~>m next = 0; 

} 

svc_pdu(vp->vcte_pcif l mtod(m, caddrj), len); 

#include B ../sys/domaln.h M 

extern struct domain svcdomain, pvcdomain; 

#define ADDDOMAIN(x) { \ 

extern struct domain x/**/domain; \ 

x/**/domain.dom next = domains; \ 

domains = &x/**7do^ain; \ 



/* 

* svcjnito allocates global memory area for ATM signaling. 

extern Int tr_buf_size; 

struct vcte svc vctes[VCTAB SIZE]; 

Int svc_inh_count = 0;"" 

struct ulptab svc_ulptab[NULPS]; 

struct atm_globs atm globs; 

struct tr globs tr_gio6s; 

struct svc globs svc globs; 

char " svc_e164_str[32]; 

svc InitQ 
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{ 

staict vcte *vp; 

int svcmacJmiO. svcmacJnputO; 

If (svcjnft count) 
return; " 

svc_glob- > statlc_buf = svc_el64_stn 
svcJnft_count = 1; 

b2ero(fisvc_glob->svcstat, slzeof(struct svcstat)); 
svc_glob-> vcte_free = svc votes; 
svc~glob- > vcte~base = svc_yctes; 
svc_glob->ulptab = svc ulptab; 
svc g!ob->ulp inuse = 0; 

for Tvp = svc vctes; vp < &svc vctes[VCTAB SIZE]; vp++) 
vp->vcte next cref = (struct vcte *) & vp[l7; 

(-vp) - > vctejiexfcref = 0; 

svc_glob->sig_ulp = ulp reglster(LMI LMI ORG, 
LMI_LMI_PID, ~ ~ ~ 

svcjnac input, svc macjmi, 0); 

svc_glob->svc pciF= 
(struct pelf *Fatm_a!loc_bytes(sizeof(struct pelf) * NNIU); 

bzero((caddr_t) svc g!ob->svc pelf, slzeof (struct peff) * NNIU); 

svc_glob->svcj>cifn « &svc_gTob->svc pcfffNNIUJ; 

svc_glob- > svc~parms = svcTparms; 

atm_glob->atmif = (struct atmlf *) 

atm alloc bytes(sizeof (struct atmlf) * NATMS * NNIU); 
bzero((caddrJ) atm_glob->atmlf f 

slzeof(struct atmif) * NATMS * NNIU); 

trJnit(tr_glob, tr buf size); 
ADDDOMAIN(pvc); " 
ADDDOMAIN(svc); 
ADDDOMAIN(llc); 
pvcJnitO; 

#if 0 

atm bzero(p t I) 
cFar *p; 

bzero(p, I); 



atm bcopy(s, d, I) 
cfiar *s, *d; 

bcopy(s, d, I); 



atm_bcmp(s, d, I) 
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char *s, *d; 

{ 

return bcmp(s, d, I); 

} 

#endif 
/* 

* svc_sched_tlmeout() Is called to schedule svc tfmeoutO to be 

* called with the argument *pc M when the next signaling tick tack's. 

* On UNIX this is mapped onto timeoutO converting svc_ms_per_tlck 

* to Hertz. Presumably MS-DOS uses Avis based timeouts. ~ 

V 

svc_sched timeout(pc) 
struct pcif *pc; 

int svcJimeoutO; 

timeout(svc_timeout, (caddrt) pc, 
(svc_ms_perjick * hz) / 1000); 



/* 

* svc_report_version_conflict() is called everytime a signaling PDU 

* with an unsupported version is received. It should report this 

* using the appropriate OS routines. For UNIX we printf to the 

* console no more than once every 15 seconds. 
V 

struct timeval svcJast_conflict; 

svc report version conflict^ 
{ ~ 

extern struct timeval time; 

if ((svcJast_conflict.tv_sec + 15) < time.tv_sec) { 

printf("niu6: signaling protocol version conflict\n"); 

svc last conflict.tv sec ■ time.tv sec; 
} " " 

} 

* atm_ailoc_msgO allocates a msg buffer large enough for signal 

* PDUs. 

V 

caddr_t 

atm alloc msgO 
i ~ ~ 
struct mbuf *m; 

m = m_get(MJDON7WAIT, MTJDATA); 
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If (!m) 

return 0; 
m->m_off * MMINOFF; 
m->m"len = 0; 
return mtod(m, caddr t); 

} 

struct mbtrf *atmjastfm; 
/* 

* atm_free_msgO frees message memory pointed to by cp. 
*/ 

atm free msg(cp) 
cfiar * C p; 

ASSERT(IVALIDVP((struct vcte *) cp)); 
atmjastfrn = dtom(cp); 
^ m_freem(atmjastfm); 

/* 

* atm_alloc_bytesO is used to allocate memory for data structures 
*^which are never freed, e.g., svc_pclf tables. 

caddr_t 

atm alloc bytesfn) 
{ " ~ 
return kmem_alloc(n); 

int atm trace to console = 0: 

* Convert address to a hex byte string. The length of the address 

* Is specified with the argument lea 
V 

char * 

atmjnac_sprintf(ap, len) 
u_char *ap; 

Int |; 

char *cp ■ atm glob- > static buf; 

static char digits[] ="""0 1 23456789abcdef ; 

for(i - 0; I < len; I++) { 
*cp+ + = digfts[*ap > > 4]* 
*cp+ + a digits[*ap+ + & 0xfl; 
*cp++ = V; 

*-cp = 0; 

return atm_glol>>static_buf; 
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/* if atm.h 

* *~ 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 
/* 

#ifndef NIU ATM H 
#define NllTATM~H Included 

#lnclude "bytes.h - 
#Indude "unlpdu.h" 



* atm mac service Interface (asl). This Is the same as an ethemet 

* header so that upper layers can simply assume ATM Is an ethemet. 

V 

struct atmmsl { 
u_char asi_dst[6]; 
u~char asl src[6]; 
u short asftype; 

}; ~ 

r 

* Structure of an ATM mac header for aal type 4, this is an 802.6 

* header. 

V 

struct atmjieader { 
struct atm_addr atm_dst; 
struct atm addratm_src; 
union { 
struct { 
ujnt mcbj)ld:6; 
ujnt mcb_pad:2; 
ujnt mcb_delay:3; 
ujnt mcb Joss: 1; 
ujnt mcb_crc:1 ; 

ujnt mcb elen:3; 

ujnt mcb_pad1:16; 
} mcblts; 
u Int atm mcb long; 

} un mcb; 

}: " . 

#define atm mcblts un mcb.atm mcb long 
#deflne atmTelen unjhcb.mcbfts.mcBelen 
#define atm_crc un mcb.mcbits.mcb_crc 
#define atm Joss un~mcb.mcblts.mcb Joss 
#define atmjjelay unjncb.mcblts.mclTdelay 
#define atrn_pld unjncb.mcbits.mcbj>id 
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#define ATM_PID LLC 1 /* protocol ID for LLC */ 
#define ATM MCBITS NOCRC 0x04000000 /* protocol Id 1 */ 
#define ATM~HDR L£N sizeof(struct atm header) 
#defme ATM^PADlSHIFT 24 

/* 

* The only header extension defined Is a return port address. The 

* length must be set to ATMERPA SIZE. Pad exists to get the 64 bit 

* address 64 bit aligned relative to the atm header. 
V 

struct atm_header_ext { 
u_char atmejen; 
u__char atme_type; 

u_char atme_pad[2]; /* need not be zeros (nnbz) */ 
struct atm addr atme rpa; /* return port address */ 



#define ATMERPAJTYPE 112 /* out of SMDS range */ 
#define ATME_RPA BYTES sizeof(struct atmheader ext) 
#def ine ATME_RPA~WORDS ((sizeof (struct atm_heacfer_ext) + 3)/4) 

/* 

* Callers to atm data reqO must ensure atieast ATM_DATA_REQ_ROOM 

* bytes are available In front of the packet data. 

V 

#define ATMJDATA_REQ_ROOM (ATM_HDR_LEN + LLC_SNAP_LEN + ATM E_RPA_B YTES) 

r 

* multicast address structures are linked to atm arptabs which are 

* marked ATF_MULTI. Such entries are not timed out, nor are they 

* freed when underlying VCs are released, atm delete lanO tree's 

* the ATF_MULTI atmjarptab entries and atmjeiddjanft & 

* atm_niujto__niuO re-allocate them and re initiate MC VCs for the 

* registered addresses/ 

V 

struct mcaddr { 
u_char mc_enaddr[6]; /* multicast address */ 
u_short mc_count; /* reference count */ 
struct aate *mc_at; /* multicast VC */ 

}; 

#define MCADDRMAX 64 /* multicast addr table length */ 
#define MCCOUNTMAX (32*1024-1) /* multicast addr max 
* reference count */ 

/* 

* atmrf, one per atm Ian, used by atm Ian layer 
*/ 

struct atmlf { 
struct niu_arpcom *ati_ac; /* contains arp and ifnet 
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* structures * / 

struct atmif *ati_next; /* linked off peff structure */ 
u_short atl_state; /* basically do we know who 

* we are */ 

u_short ati_mld;/* mid used for multicast frames */ 
u_short atijncasts; /* max # multicasts circuits 

* configured */ 

struct atm addrati port; 
struct atnrTaddr atTmac; 
#define ac_mac "ati_mac.aa_byte[2] 

struct pcif *ati_pcif; 

struct aate *ati_arptab; /* set at initialization */ 
Int ati_num_mcasts; 
^ struct mcaddr ati_mcaddrs[MCADDRMAX]; 

/* ati state * / 

#define ATSJNACTIVE 0 

#define ATS_ACTIVE 3 

/* 

* global data structure for r/w variables and variables explicitly 

* Initialized. 

V 

#include "Hah" 

struct atm_globs { 
struct BMdr hdr *ltrb; 
struct atmif *atmif; 
int atmlfn; 
int atmif used; 

struct llc_snap HcHdef; 
struct atm addr atm_broadcast; 
struct atm_addr atm null; 
struct ulptab *atm_u)p; 
Int atm initialized; 

char staSc_buf[32]; 

#lfndef RT68K 

extern struct atm_globs atm globs; 
#define atm_glob (&atm globs) 
#else 

#deflne atm_glob atm get globO 
struct atm globs *atm~get globO; 
#endrf " " ~ 
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#define LEN_FOR_MBUF_PTRS 0xf5560002 

#define HASH_MULTICAST_ADDRESS(x) ((x)&0xff) 

caddr t atm alloc msgO. atm alloc_bytes0; 
#define NATMS ~4 / r max # of ATM lans per physical 
* Interface */ 

#define e160_ntoa svc_e164_ntoa/* these are really E.164 addresses */ 
#endif /* NIU_ATM_H */ 
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/* If nlu.c 

* - 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 
/* 

* Description: This file contains the network interface portion of 

* the nlu device driver. 
* 

V 

static char sccsid[] = "%A%"; 



#ffndef KERNEL 
#define KERNEL 
#endlf 

#ifndef INET 

#define INET /* only support internet 
#endif 

#include "../sys/param.h B 
#include "../sys/systm.h" 
#include "../sys/mbuf.h" 
#include "../sys/socketh" 
#include "../sys/errno.h" 
#include "../sys/ioctLh'' 
#include "../sys/time.h" 
#inciude V/sys/kernel.h" 
#include "../sun4c/psl.h" 

#include "../net/if.h" 
#include "../net/netisr.h" 
#include "../net/route.h" 
#lnclude "../net/if_arp.h" 

#include ".,/sun/openprom.h" 
#inciude "../sundev/mbvar.h" 
#lnclude ^./sun4c/mmu.h ,l 

#lfdef INET 
#inciude "../netinet/ln.h" 
#include "../netinet/in_systm.h" 
#include "../netinet/in var.h" 
#include "../netinet/lpTh - 
#endif 

#indude "debug.h" 
#include "nlu.h - 
#include *unlpdu.h" 
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#include "atm.h" 
#lnclude "Uc.h" 
#include "svch" 
#indude "ifjiiuarp.h" 
#include "atmarp.h" 
#include "if nlu.h" 
#include "iTniuio.h" 
#inciude "trace, h" 
#lnclude "../net/nit tf.h" 
#lnclude "snlt.h" 

Int aa!_trace_enable = 1; 

/* debugging and tracing stuff */ 

#define DL1 1 

#define DL2 ni u_d ebug > 1 

#define DL3 niu_debug>2 

#define DL4 niu_debug>3 

#define DL5 niu_debug>4 

#defineTU 1 

#def ine TL2 niu_trace > 1 

#define TL3 nlu~trace>2 

#define TL4 niu~trace > 3 

#define TL5 niujtrace>4 

#define DRAIN TIME 4 

/* the SIOCNIUDBUG will set ALL debugging and tracing levels */ 
int niu_debug = 1 ; /* conveys important driver 

* Information */ 

int niu_trace = 1 ; /* show excessive detail of the 

* program stream */ 
extern int arp_debug; 
extern int arp_trace; 
extern int dry debug; 
extern int dnftrace; 
extern int dump_flag; 

int niumtu = 2000; 

int niu_unit_count = 0; /* total number of sw and hw 

* units installed */ 
struct niu_dev nlu_info[NNIU]; /* network interface device structure */ 
int niuoutputO, niusoioctiO; 

r 

* Name: niuoutput 

* Input: *ifp - pointer to network Interface to 

* use. m - mbuf pointer containing packet to be sent 

* dst - ip address of destination. 



* Output: None. 
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* Return: 0 - no error. Error - 

* Unix error code. 

* Description: This routine is called with a frame and a destination 

* address. Appropriate address resoltuion is performed for the 

* destination addresses until a VCI is obtained. The families 

* supported are: AF INET: An IP address Is resloved using ARP 

* Into a 48 bit address. AF UNSPEC: A 48 bit address Is resloved 

* into a 60 bit address ancTLLC/SIMAP header is added. AF NS: A 48 

* bit address is resloved into a 60 bit address but no LLC/SNAP 

* header is added. AF CCITT: A 60 bit telephone number is resolved 

* Into a VCI using the port address to vci tables. AF DU: A VCI 

* is supplied. No resolution Is performed. The VCI Ts in 

* sockaddr_aal structure. AF INET, AFJJNSPEC and AF NS frames are 

* encapsulated as per 802.6."Other address families are assumed to 

* be encapsulated already. 

* Note: The above families overload existing AF xxx values. Also raw 

* aal frames get queued on the first atmlan's ifnet send queue for 

* lack of a better place to put them. 

V 

Int niu_reset on full = 0, niu_auto resets - 0; 

int williepanfc = 0; 

niuoutputpfp, m, dstin) 
struct ifnet *ifp; 
register struct mbuf *m; 
struct sockaddr *dstin; 

int usetrailers, s, len, tfuntt, rate; 

struct vcte *vp; 

struct ffqueue *ifq; 

struct sockaddr Idst; 

struct mbuf *mh; 

struct in_addr Idst; 

u_char endest[6]; 

struct nlu arpcom *ac; 

struct aarparms *ap; 

struck ilc_snap *ic; 

Int - iounit, error - 0; 

iounit - NIU IFUNIT_TOJOUNIT(rfp.>lf unit); 
/* check if network is up */ ~ 

TR4(TL3. "nluoutput(%x, %x, %x, af=%d)\n" f 

ifp, m, dstin, dstin->sa family); 
if ((ifp->if flags & IFF UPJ"" 0 && 

dstin- >sajamily != AFJ)U) { 
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m_freem(m); 

error = ENETDOWN; 

goto rtn; 

} 

tfunlt - ifp->K unit; 
ac = &nlu_arpcoms[ffunlt]; 
s - splr(lpltospl(nlu lnfo[lounlt]. priority)); 
#ifdeflNET 
If (dstin->sajamily == AF INET) { 
Idst = ((struct sockaddrjn *) dstin)->s!n addr; 
DB2(DL2, "aa%d: dest = %s\n", 

If unit, inet ntoa(idst)); 
if (lniu_arpresolve(ac, m, &Idst, 

~ldst.sa_data, &usetrailers)) { 
goto its; 

} 

((struct ether header *) ldstsa data)- > ether type - 

ETHERTYPE IP; ~ 
Idstsajamily = AFJJNSPEC; 
dstin = &ldst; 
} else 
#endif 

If (dstin->sajamlly != AF DU && 

dstin->sa family 1= AF NS && 

dstin->sajamlly 1= AF~UNSPEC) { 
printf("aa%d: can't handle af%d\n", ifp->lf unit, 

dstin- > sajamily) ; 
mfreem(m); 

niujnfo[iounit].stats.errors+ + ; 
error = EAFNOSUPPORT; 
goto rts; 

} 

* dstin.sa data contains an ethernet header w/o a source adr 

* & type. "(unless AF DU In which case we have a vci...) 
V 

if ((m->m off & 0x3) 1 1 M HASCL(m) 1 1 /* make room */ 
(m->m_off - MMINOFFT< (ATMJ)ATAJ*EQ_ROOM + 

sizeof (struct aal parms))) { 
if ((mh = m get(M DORTWAIT, MT_DATA)) « « NULL) { . 
m_freem(m); 
error = ENOBUFS; 
goto rts; 

} 

mh->m len = 0; 
mh->m_off = MMAXOFF; 
mh->m_next = m; 
m = mh; 

} 

if (dstin-> sa Jamil y = = AFJJNSPEC) { 



WO 94/07316 



7* 
If niu.c 

~ -56- 

/* add LLC and SNAP */ 

Ic = &(mtod(m, struct llc_snap *)[-1J); 

*lc = atm_glob->llcjdefT 

lc->llc type = ((struct atmmsl *) dstin->sa data)->asl type; 
m- > m j>ff -= sizeof (*lc) ; 
m->nTlen sizeof (*lc); 

} 

len = 0; 

for (mh « m; mh; mh = mh->m next) 

len += mh->mjen; 
If (dstln->sajamlly = = AF UNSPEC 1 1 

dstin->sa family = = AFNS) { /* get vcl for mac 
^"address */ ~~ 

struct atm_header *ah ~ mtod(m, struct atm header *); 

struct aate" *aat; 

If (0fp->lfjags & IFF RUNNING) «- 0) { 
m_freem(m); 
error = ENETDOWN; 
goto its; 

} 

len += sizeof (*ah); 
ah-; 

ah- > atm dstaa_long[0] = AAT_MAC << 28; 
bcopy(dstin->sa data, &ah->atm_dstaa_byte[2], 6); 
ah->atm src = atm glob->atmlf[ifunlt].atl mac; 
ah->atnfmcbits = r(ATM_PID_LLC << 2f + 

((4 - (len & 3)) & 3)) < < ATM PAD_SHIFT; 
ah->atm_elen = 0; 
m->m_off -= sizeof (*ah); 
m->mjen +« sizeof (*ah); 
aat = atmjind at(&atm_glob->atmif[Jfunit] f 

dstin->sa"data); 
If (laat 1 1 l(vp = aat->aate_vcte)) { 

m_freem(m); 

error = EXDEV; 

goto rts; 

} 

If (vp->vcte_state < VCSESTAB) { 
atm_append packet (vp, m); 
goto rts; 

} 

} else { 

ASSERT(dstin->sa family = = AF DU); 

vp = ((struct sockaddraal *) dstfn)->saal vcte; 

If (vp) * 

ASSERT(VAUDVP(vp)); 

m->m_off -= sizeof (struct aal_parms); 
m->mjen + = sizeof (struct aaJ parms); 
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ap = mtod(m, struct aalparms *); 
ap->ap_mid = atm_glob->atmlf[ifunlt].atl mid; 
ap->ap_vpcl = vp->vcte ovpcl; ~ 

ap->ap_rate = vp- > vcte ""opeak^rate >> 4; /* from 1K bps to 16K 

* bps units *7 
If (vp->vcte aal = = 0) 

ap->ap flags = AALP RAVVCELL | AALP CRC NONE; 
else 

ap->ap flags = AALP_CRC NONE; 
/* lop, kludge tPl rev 2 fred \/f with 960 gets Implemented */ 
If ((!(vp->vcte_pclf->pc flags & PCIF_NIU TO NIU)) && 

vp->vcte_pcif->pc_sTg->vcte state ==~Vd5 ACTIVE 

ap->ap_flags | = AALP ENABtE XON XOFFf 
vp->vcte_opackets++; " 
ifp->tf opackets+ + ; 

/* " 

* If multicast then frame must be single threaded so used 

* the atm Ian index + 1 to indicate in which outbound queue 

* the frame should be placed. 
V 

ap->ap orderq = (vp->vcte_flags & VCTEF MCAST_CUENT) ? 

(Int) (vp->vcte atmif-atm glob->atmH) +~1 : 

AALPJJNORDlRED; 
ap->ap__orderq = 4; /* iop, niu bug requires no more than 

* 1 vci per rate queue */ 
ap->ap len = len + sizeof *ap; 
/* " 

* Place packet on interface transmit queue 
V 

Ifq = &niu info[iounft].sendq; 
if (IF_QFULL(ifq)) { 
DB0(DL2, "niuouput: interface q full\n°); 

if (niu_reset_on_full | | niujnfo[iounitj.type == NIU TYPE SW 1 1 
niu Jnfo[lounlt]. board Id == NIU REV3) { 
ASSERT(willie panic = = 0); 
while (m) { 
m freem(m); 
IF~DEQUEUE(ifq, m); 
IF_DROP(ifq); 

niu_auto resets+ + ; 
(*niu info[iounlt].reset) (iounlt 0); 
TR1(TL1 f "aa%d auto reset\n", Kp->If unit); 
printf("aa%d auto reset\n", ifp->if unit); 
If (niuJnfo[iounlt].type = = NIU fYPEJHW) { 
setup jxbuf(&niujnfo[iounitjj7 

} else { 
IF_DROP(lfq); 
m_freem(m); 
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} 

error = ENOBUFS; 
} else { 

TR1 (TL3, *%d on queue: ■ lfp->lf snd.Kq len); 
IF_ENQUEUE(lfq, m); ~ 

(*niuJrrfo[iounit].sendpkt) (iounft); 
its: 

splx(s); 
rtn: 

TR3CTL3, "nluoutput->%d t %d q %d d\n", 

error, Ifq^lfq^len, lfq->lfq_drops); 
return error; 

} 

/* 

* send mbuf chain m on physical Interface pc over VC vp using the 

* aal associated with that vp. mid is the multiplex id for aal 3/4. 

* It Is Ignored for aal 5. 

V 

vcoutput(vp, m, mid) 
struct mbuf *m; 
struct vcte *vp; 



{ 



int s t len; 

struct Jfqueue *lfq; 
struct mbuf *mh; 
struct aal_parms *ap; 

int iounit = vp->vcte_pcif->pc_num; 

Int error = 0; 

ASSERT(VAUD VP(vp)); 

s - splr(lpltospT(niuJnfo[iounit].priority)); 



If ((m->m_off & 0x3) 1 1 M HASCL(m) | , 

(m->m_off -MMINOFFf< sizeof (struct aal parms)) { 
If ((mh = m get(M DONTWAIT, MT DATA))""- NULL) { 
m_freem(m); 
error = ENOBUFS; 
goto its; 

} 

mh->mjen = 0; 
mh->m_off = MMAXOFF; 
mh->m next = m; 
m = mfti 

} 

m->m_off -= sizeof(struct aal parms); 
m->mjen += sizeof (struct aal parms); 
ap = mtod(m, struct aalparms""*); 
ap->ap_mid = mid; 
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ap->ap_vpcl = vp->vcte_ovpci; 

ap->ap_rate = vp->vcte opeakjate >> 4; /* from 1K bps to 16K 

* bps units *7 
If (vp->vcte aal == 0) 

ap->ap_flags = AALP_RAW_CELL | AALP_CRC_NONE; 
else 

ap->ap_flags - AALP CRC NONE; 
if ((l(vp->vcte pdf->pcHagsfc PCIF NIU TO NIU)) && 
vp->vcte_pcif->pc sTg&& 

vp->vcte_pcif->pcsig->vcte state == VCS ACTIVE) 
ap->ap_flags | - AALP ENABLE XON XOFF~ 
vp->vcte opackets+ + ; 
/* 

* if multicast then frame must be single threaded so used 

* the atm Ian index + 1 to Indicate In which outbound queue 

* the frame should be placed. 

V 

#» o 

ap->ap orderq « (vp->vctejlags & VCTEF_MCAST_CUENT) ? 
(int) (vp->vcte atmif - atm glob->atmH) + 1 : 
AAUMJNORDERED; 
#endrf 

ap->ap_orderq = 4; /* lop, niu bug requires no more than 

* 1 vci per rate queue */ 
for (len = 0, mh = m; mh; mh = mh->m next) 

len += mh->m len; 
ap->ap len = len; 
/* ~ 

* Place packet on interface transmit queue 

V 

Ifq = &niu info[iounit].sendq; 
If (IF_QFULL(ifq)) { 
DB0(DL2, Vcouput: interface q full\n"); 
If (niu _reset on full 1 1 

niu info[Ibunft].type = = NIU TYPE SW 1 1 
niu~info[iounit] .board id =="NIU R"EV3) { 
ASSERT(willie panic " 0); ~ 
while (m) { 
m_freem(m); 
IF_DEQUEUE(ifq f m); 
IF DROP(ifq); 
} " 

niu_auto_resets+ + ; 
(*niu_info[iounit]. reset) (iounlt, 0); 
TR1(TL1, "niu%d auto reset\n\ iounlt); 
printf( B niu%d auto reset\n' f iounlt); 
If (niujnfopounitl.type = = NIU TYPE HW) { 
setup_rxbuf(&niuJnfo[iounit]ft 

} else { 
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IFDROP(ifq); 
nTfreem(m); 

} " 

error = ENOBUFS; 
} else { 

TR1(TL1, "%d on queue: \ Kq->lfajen); 
IFENQUEUEflfq, m); 

(*nlu lnfo[lounlt].sendpkt) (lounlt); 
its: 

splx(s); 

TR3(TL1, Vcoutput->%d, %d q %d d\n" ( 

error, ifq->ffqjen. ifq-> Hydrops); 
return error; 

} 



9? 

if niu.c 



int niu_esr = 0; 

niu_restart_sends(unit) 

struct atmif *atp; 

ff (!niu_esr) 
return; 

atp = svc glob->svc pcff[unlt].pc atmif; 
while (atpf{ 

if (((struct rfnet *) atp->ati ac)->if snd.ffqlen) 
(*niuJnfo[unft].sendpktf(unlt); " 

atp = atp->ati_next; 

} } 
/* 

* Name: niusoioctl 
* 

* Input: *Hp - pointer to network interface to use. cmd 

* - command requested. *data - data associated with the command. 

* Output: *data - data may be filled in by certain commands. 

* Return: 0 - no error. Error - Unix error code. 

* Description: This is the network interface ioctl routine. An ifreq 

* structure must be used to access this routine. 

V 

niusoioctl (if p f cmd, data) 
register struct Ifnet *ifp; 
Int cmd; 
caddrj data; 
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Int error = 0. 1, s, svcjtlmeoutO; 

Int HPunlt = lfp->lf unit; 

extern Int atmarpjimeol, atmarp_timeo2; 

struct Ifreq *lfr = (struct Ifreq *) data; 

struct ffaddr *ffa = (struct ifaddr *) data; 

struct niu arpcom *ac = (struct nlu arpcorn *) Hp; 

struct dblnfo *dbp; 

struct mcaddr *mca; 

struct atmlf *atp; 

TR2(TL3, "aa%d(%x): niusoloctl entered\n", ifunft, cmd); 

switch (cmd) { 

case SIOCSIFADDR: 
/* set the Interface ip address */ 
TR1 (TL4 f -aa%d: loctl SIOCSIFADDR\n", Ifunft); 
switch (ifa->lfa addr.sa family) { 
#lfdef INET 

case AFJNET: 
niu_arpcoms[ifunft].ac Ipaddr = 
IA SIN(ifa)->sin addn 
' tfp->Tf_fiags | = IFF UP; 
break; 

#endif 
default: 
break; 

} 

break; 

case SIOCSIFFLAGS: 
/* set Interface flags */ 

TR3(TL4, "aa%d: loctl SIOCSIFFLAG (%d)flag=%d\n' f 

ifunlt, ifp->iHlags, ifr->ffrflags); 
ifp->ff_flags = ifr->ifr flags; 
If (ifp->lf_flags & IFFjJP) { 

struct niu dev *niu; 

nlu = &nuiJnfolNIU IFUNIT TO IOUNIT((fp->lf unit)]; 
If (niu->type = = NlG_TYPE~HWj" { 
setup_rxbuf(nlu);, 

> } 
break; 

case SIOCGIFFLAGS: 
/* get interface flags */ 

TR2(TL4, "aa%d: loctl SIOCGIFFLAG flag=%d\n\ 

Ifunlt. ifp->if flags); 
If r- > if r_flags = Tfp->IHIags; 



WO 94/07316 



/60 

if niuc 



break; 

case SIOCGETPORT: 
/* get port address */ 

TR3(TL4, "aa%d: ioctl SIOCGETPORT port=%8x%8x\n" f Ifunit, 
atm_glob->atmff[lfunit].ati portaa long[0], 
atm_glob- > atmlf fffunft] .at fportaalongf 1 J) ; 

lfr->lfr addr.sa family = AFJ5CITT; ~ 

bcopy^&atm__gIob- > atmlf [Hunlt] .atljaort, 

ffr->lfr addr.sajlata, 

sizeof (struct atm addr)); 
break; 

case SIOCNIUDBUG: 
/* set debug level for the entire niu device */ 
dbp = (struct db Info *) ifr->ifrdata; 
niudebug = dbp->niu debug; /* network interface */ 
niu_trace = dbp->nlu_trace; 
arpjdebug = dbp->arp_debug; /* arp */ 
arp~trace = dbp->arp_trace; 
drvjdebug = dbp->drv_debug; /* /dev/nlu */ 
drv_trace = dbp->drv_trace; 

DB3(OL2, "aa%d: IoclJ SIOCSNIUDBUG niu=%d %d\n", 

Ifunlt, niu debug, niu trace); 
DB3(DL2, "aa%d: ioctl STOCSNIUDBUG arp«%d %d\ri\ 

ifunit, arp_debug, arp trace); 
DB3(DL2, "aa%d: ioctl SfOCSNIUDBUG drv=%d %d\n\ 

Ifunlt, drv_debug, drv trace); 
break; 

case SIOCGIFADDR: 
case SIOCGMACADDR: 

/* get the interface ip address */ 

TR1(TL2, "aa%d: ioctl SIOCGIFADDR\n", ifunit); 

bcopy(&niu_arpcoms[ifunit].ac atmff->ati macaa byte[21, 
lfr->ifr_addr.sa data, 6); " ~ ~ 

break; 

case SIOCSMACADDR: 
/* set the interface ip address */ 
TR1(TL2, "aa%d: ioctl SIOCSIFADDR\n". Ifunlt); 
bcopy(ifr-> ffr_addr.sa_data, 

&nIu_arpcoms[ffunlt].ac atmif->ati macaa byte[21. 6); 
break; " " - 

case SIOCGAATIME01 : 

b^)y(&atmarp jimeol , 8Jfr->ifr_metric ( sizeofflnt)); 

case SIOCSAATIMEOI : 

bcopy(&ifr->ifr_metric, &atmarp timeol, steeofflnt)); 
break; 

case SIOCGAATIME02: 
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bcopy(&atmarp_timeo2, &lfr->lfr_metric i slzeofflnt)); 
break* 
case SIOCSAATIME02: 
bc»py(&ifr-> If ^metric, &atmarp_timeo2, sizeofflnt)); 
break; 
case SIOCTIMEOUT: 
If ((atp = atm glob-> atmif) « 0) { 
error = ENXlO; 
break; 

} 

s = splnetO; 

untimeout(svc_tlmeout, atm glob- > atmif [If unit] .atl pelf); 

sve tlmeout(atrn_glob->atmrf[ifunit].atl_pclf); 
for J\ atp < &atm_glob- > atmif [atm glob->atmif_used]; 
atp++) { 
If (atp->ati_state == ATSJNACTIVE) 

continue; 
atm arptimer(atp); 

} 

splx(s); 

break* 
case SIOCADDMULTI: 

TR1 (TL4, "aa%d: loctl SIOCADDMULTI\n", Ifunlt); 

error = niu_addmulti(ifp, ifr->ifr_addr.sa_data); 

break* 
case SIOCDELMULTI: 

TR1(TL4, u aa%d: ioctl SIOCADDMULTI\n", ifunlt); 

error = nlu^delmulti^p, ifr->ifr_addr.sa_data); 

break* 
case SIOCSPROMISC: 

ifp->IMIags ~= IFF_PROMISC; 

printf( u aa%d promiscuous %sabled\n M , ifunlt, 
lfp->lf_flags & IFF_PROMISC ? "en" : W); 

break: 
case SIOCGSTATE: 

/* get signaling vc state */ 

TR2(TL4, "aa%d: ioctl SIOCGSTATE state=%d\n" ( ifunlt, 
atm_glob-> atmif [rfunit] ,atl_pcrf->pc slg->vcte state); 
ifr->ifrjmetric = 

atm glob->atmif[tfunit].ati_pclf->pc sig->vcte state; 
break; " ~ 

case SIOCSSTATE: 
/* get signaling vc state */ 

TR2(TL4, "aa%d: loctl SIOCGSTATE state =%d\n", ifunlt, 
atm g1ob-> atmif [IfunitJ.ati pcif->pc sig->vcte state); 

If (ifr->Tfr_metric < VCS INACTIVE 1 1 " 
ifr->ifr metric > VCS ACTIVE) 
error =~EINVAL; 

else 

sve new state(atm glob- > atmif [lfunlt].ati pcff->pc sig, 
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lfr->lfr metric); 

break; 
default: 

DB2(DL2, -aa%d: toctl bad command =%x\n', 

Ifunlt, cmd); 
error = EINVAL; 

} 

return (error); 



r 

* Find a multicast entry in the multicast filter for atm Ian, atp. 



struct mcaddr * 
niu_findmulti(atp, mac) 

struct atmif *atp; 

u char *mac; 

{ 

int i; 

for (i = 0; i < atp->ati_num mcasts; I++) 
if (bcmp(atp->ati mcaddrs[i].mc enaddr, mac, 6) == 0) 
return &atp->ati_mcaddrs[i]; 
return 0; 

} 

/* 

* Add a multicast address to multicast filter for atm Ian, atp. 

V 

niu_addmulti(ifp, mac) 
struct ifnet *ifp; 
u char *mac; 

{ 

int i f s, error; 

struct aate *at; 
struct mcaddr *mc; 

struct atmif *atp = ((struct niu_arpcom *) ifp)->ac_atmif; 

if ((mac[0] & 0x1) 0) 

return EINVAL; /* not a multicast address */ 
mc = niu_findmulti(atp, mac); 
s = splimpO; 
if (mc) { 

if (mc->mc_count < MCCOUNTMAX) { 

mc->mc count++; 

splx(s); " 

return 0; 
} else { 

splx(s); 

return ENOSPC; 
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> 

} 

If (atp- > ati_num_mcasts == MCADDRMAX) { 
splx(s); 

return ENOSPC; 

} 

mc = &atp->atl_mcaddrs[atp->ati_num_mcasts]; 

mc->mc_count = 1; 

bcopy(mac, mc->mc_enaddr f 6); 

at = mc->mc at = aim find at(atp, mac); 

(at = = o) {" " " 

sp!x(s); 

return ENOSPC; 

} 

at->aatejlags |= ATFJWULTI; 
atp->atl num mcasts++; 
splx(s); ~ 
return 0; 



r 

* Delete a multicast address from multicast filter for atm Ian, 
V 

niu^delmultKlfp, mac) 
struct ffnet *ifp; 
u char *mac; 

{ 

struct mcaddr *mc; 
int I. s; 

struct aate *at; 

struct atmif *atp = ((struct niu_arpcom *) ifp)->ac atmlf; 



mc = niu_findmulti(atp l mac); 
ff (mc = = 0) 

return ENXIO; 
s = spIimpO; 

If (~mc->mc count > 0) { 

splx(s); 

return 0; 
} else If (at = mc->mc at) { 

ASSERT(at->aate_flags & ATF MULTI); 

at->aatejlags &= ~ATF_MULTI; 

atm_aate_free(at) ; 

bcopy(&atp->atl_mcaddrs[-atp->ati num m casts], mc, sizeof(*mc)); 

spix(s); 

return 0; 
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/* 

* go steal an ethemets low order 2 bytes and append It two 

* Adaptive's IEEE prefix. 

V 

unsigned int def_enaddr[2] = {0x0080b2e0, 0x00010000}; 

nlu get enaddr(unlt, enaddr) 
ujnt" unit; 
u"char *enaddr; 

{ 

struct Ifnet *ifp; 
extern struct ffnet *lfnet; 

bcopy(def enaddr, enaddr, 6); 
for (Ifp m ffhet; ffp; tfp = lfp->if next) 
If (ifp->ffjntu == 1500) { 

enaddr[3] « (((struct niu_arpcom *) ffp)->ac_enaddr[3] & 0x1 f) | 

enaddr[4] = ((struct niuarpcom *) lfp)->ac_enaddr[4]; 

enaddr[5] « ((struct niu_arpcom *) ifp)->ac_enaddr[5]; 

break; 

} 

enaddr[0] = (u_char) unit < < 1 ; 

/* 

* This routine just looks up the Input vcl and dispatches the frame 

* to the appropriate input routine based upon vcl. Signaling and 
*^raw user access does not necessarily use 802.6 framing. 

int svc_send_releases = 1; 

deliver packet(unit, mO, vcl) 
int ~ unit; 
struct mbuf *m0; 
u short vcl; 



{ 



struct vcte *vp; 

struct pelf *pc; 

int s; 

int plen; 

plen = mjen(mb); 

aaljrace m(m0, plen, 1, vcl); 
s = splimpO; 

pc « &svc_glob->svc_pcff[unlt]; 
if (pc- > pcJ7aw_vp) { 

pc->pc~rawjvp->vcte -packets* +; 
pvc lnput(p£>pc ravTvp, mO); 
} elseTf (vp = Ivpcl to vcte(pc, vcl)) { 
If (VCS_DATA IND OK & VCS TO VMASK(vp->vcte state)) { 
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ASSERT(VAUD ULP(vp->vcte ulp)); 

vp- > vote Jpackets + + ; 

(*vp->vcte u!p->ulp_data) (vp, mO); 
} else 

m freem(mO); 
} else Tf (svc_send_re!eases && pc->pc_slg) { 
struct release *pdu; 
mJreem(mO); 

pdu = (struct release *) atm alloc msgO; 
pdu->lmi_proto = LMI PROTOCOX; 
pdu->lmi_pdu type =TDU INVAUD PDU; 
pdu- > lml_crefjype = LMI ~CREFTYPE_PVC; 
pdu->lmrcref value = vdf 

LMI SET ~ELEMEIMT(&pdu-> Imi cause. LMI RELEASE_CAUSE, 

"VCI UNACCEPTABLE); " 
svc_xduTpc, 0, pdu, slzeof *pdu); 

splx(s); 

} 

/* 

* niu snltlfyO makes a copy of mO, converts the 802.6/SNAP header 

* into an ethernet header and calls snit IntrQ- 
V 

struct nitif nlu nit; 
u_short erietjidr[7]; 

niu_snitify_8026(ifp ( m, hlen, promise) 
struct ifnet *ifp; 
struct mbuf *m; 

{ 

int ad]; 

u_char *sp; /* start of destination adr in 802.6 
* header */ 

ASSERT(hlen > = 20); 
if (m->mjen < hlen + 3) 

return;" /* not enough for He */ 
sp = mtod(m, u char *); 
bcopy(&sp[2], enet hdr, 6); 
bcopy(&sp[2 + 8j,"&enetjidr[3], 6); 
if (spfhlen] = = (u char) Oxaa) { 

bcopy(&sp[hlen~+ 6], &enet_hdr[6], 2); 

adj = hlen + 8; 
} else { 

bcopy(&sp[hlen] t &enet hdr[6], 2); 
adj = hlen + 3; 

} 

if (m->m_len < adj) 
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return; 
m->mjen -= adj; 
m->m_off + = adj; 

niujiftTnif header = (caddr t) enet hdr; 
nlujiitniThdrten = 14; 
niujiitnlfbodylen = mjen(m) - 14; 
niu""nlt.ntf"promisc = promise; 
snltjntr(ffp, m, &nlu_nlt); 
m->m len + = adj; 
m- >nf off -= adj; 

} 

int dump len = 64; 

Int dumpjimit = 0; 

dump frame(s, dp, words) 
char *s; 
Int *dp; 
int words; 

{ 

if (dumpjimit = = 0) 

return; 
printfC%s s); 
If (words > dumpjimit) 

words = dump limit; 
while (words-) ~~ 

prlntfC%x", *dp++); 
printfCXn"); 

int dumpbuf[64J; 
Int dumplen = 64; 

dump_chaln(s f m) 
char *s; 
struct mbuf *m; 

{ 

int left - mjen(m); 

If (left > dumplen) 
left = dumplen; 
m_copydat(m, (char *) dumpbuf, left); 
left = (left + 3) / 4; 
dumpjramefs, dumpbuf, left); 

mjen(m) 
struct mbuf *m; 

{ 

Int len; 
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for (len = 0; m; m = m->m_next) 

len += m->mjen; 
return len; 

} 

atm_arpioctl(tfuntt. cmd, data) 
Int cmd; 
caddr t data; 

{ 

struct arpreq *ar = (struct arpreq *) data; 

struct aate *at; 

Int s, error = 0; 

if <ar->arp pa.sajamily != AF UNSPEC 1 1 
ar->arp~ha.sa family 1= AFCCITT) 
return (eAFNOSUPPORT); 

s - splimpO; 

at = atm_arptab_look(&atm glob->atmlf[lfunit] i 

ar->arp pa.sa dataj; 
rf ( a t == NULL) 

error = ENXIO; 
else If (ar->arp_pa.sa data[0] & 0x01) 

error = EINVAL; 
else If (cmd = = SIOCDARP) 

atm aate_free(at); 
splx(sj; 
return error; 

} 

calc_mlen(m) 
struct mbuf *m; 

{ 

int len = 0; 

TR0(TL2 f "caic_mlen: called\n"); 

while (m) { 
len + = m->mjen; 
m = m->m next; 

} 

DB1 (DL3, "calc mien: len=0x%x\n", len); 
return (len); 

} 

m_copydat(m. buf. len) 
struct mbuf *m; 
char *buf; 
int len; 

{ 
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Int j; 
while (len && m) { 
j - len; 

if (j > m->m len) 
j = m->m1en; 

bcopy(mtod(m, caddr t), buf, J); 
buf + = ]; 
len -= J; 

m = m->m next; 

} 

return len; 

} 

aaljrace_m(m, tlen, in, vci) 
struct mbuf *m; 

int s; 

if (!aal_trace_enable) 

return; 
s = sp!70; 

atm trace J>uf(m, m copydat, IF TRACE LOG, tlen, in, vcft; 
splx(s); 

} 
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/* if_nlu.h 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

/* . 

/* static char sccsld[] = "@(#) If niu.h 1.12@(#)"; */ 
/* 

* The aal Interface is Implemented as messages send (a)synchronously 

* between the MAC and aal layers. The aai_parms structure preceeds 

* frames transmitted and received. It Is the complete Interface 

* between the aal layer and the aal user. Rather than define some 

* VC parameters at circuit setup time and pass other per frame 

* parameters with each frame, all parameters are passed with each 

* frame. Thus, at the loss of some performance, the interface 

* betwen the H/W NIU (and 960 OS) and the host is simplified. 
* 

* To do: Average rate metering parameters will be added when we figure 

* out how to use them, frame level CRC should be specified but 

* current chips have a mode bit for CRC. 

V 

struct aal_parms { 
vpci_t ap_vpci;/* vpci to be operated upon */ 
u_short ap_mid; /* mid to use with frame */ 
u_short ap ien; /* packet length (excluding aal parms 

* and */ 

/* pad bytes If AALP_CRC_SMDS) */ 

u_short ap rate;/* burst rate for frame divided by 

* 1024 V 

u_char ap_orderq; /* Identifies an ordered send 

* queue. Frames */ 

/* with the same orderq may not be interleaved. */ 
/* AALPJJNORDERED indicates no restrictions */ 
u char ap flags; /* AALP CRC xxx */ 

}; ~ ~ ~ 

/* ap crc32 values */ 
#defineAALP CRC_NONE 0 
#define AALP_CRC_ADAPTIVE 1 
#define AALP CRC SMDS 2 
#define AALP RAW CELL 4 

#define AALP~ENA§LE_XON_XOFF 8 /* enable xon/xoff higher 

* layer */ 

#define AALP_LOOP_VCI 0x10 /* loop rev frames at 960 */ 

/* ap_rate value to specify maximum link rate */ 
#define AALP_MAX_RATE (-0) /* all one's */ 
/* ap_orderq value if frame has no ordering constraints */ 
#define AALPJJNORDERED 0 

/* 

* niuoutputQ sockaddr used for raw aal access with AF_DL1. 
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* saal vote must reference a valid vcte. 
V ~ 

struct sockaddr_aaI { 
u_short saaljamily; 
u_short saaTpad2; 
struct vcte *saafvcte; 
char saalj5ad6[6]; 



struct niu_desc { 
u_char status; 
u_char nlual; 
u short reserved; 

u~lnt pkt addr; 
u~short size; 
u_short vcl; 

u int chain ptr; 

}; " 

/* used for SIOCNIUDBUQ ioctl */ 
struct dbjnfo { 

char niu_debug; 

char niu trace; 

char arp~debug; 

char arp_trace; 

char drv_debug; 

char drv trace; 

}; 

/* MTU size */ 

#define AAMTU 9188 

/* receive control registger */ 
#define RCNTL_REG 0 

#define RCNTLJDLEJNTR 0x80 /* rx fill interrupt */ 
#define RCNTL_FiLL \NTR 0x40 /* rx idle interrupt */ 
#defme RCNTL PASS IDLE 0x04 /* go through idle on every 
*cell*/ ~ 

#define RCNTL_STOP IDLE 0x02 /* stop on Idle */ 
#define RCNTL_RESET 0x01 /* reset rx fifo, abort cell, 

* spill mode */ 
#define RCNTL^MASK 0xc7 /* bits 3-5 unused */ 

/* receive status register 1 */ 
#define RSTAT1_REG 1 

^define RSTAT1 UQHT 0x80 /* rx fiber light present */ 
#define RSTATrFIFO^HALF 0x40 /* rx fifo half flag */ 
#define RSTAT1_FIFO_FULL 0x20 /* rx fifo full flag */ 
#define RSTAT1_FIFO_EMPTY 0x20 /* rx fifo empty flag */ 
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#define RSTAT1_VIOLATION 0x04 /* rx violation */ 
#define RSTAT1_MASK Oxec /* bits 0,1,4 unused */ 

/* receive status register 2 */ 

#define RSTAT2 REG 2 

#define RSTAT2 IDLE 0x80 /* rx is idle */ 

#define RSTAT2~FIFO_OVR 0x40 /* rx fifo overflow */ 

#define RSTAT2_CMD OVR 0x20 /* rx command overflow */ 

#define RSTAT2 CMD~RECV 0x10 /* rx command received */ 

#define RSTAT22COMfitAND OxOf /* rx command. 4 bits */ 

#define RSTAT2JNTRJ/IASK OxdO /* rx Interrupt mask */ 

/* transmit control register */ 

#define TCNTL REG 3 

#define TCNTCRESET 0x80 /*tx reset*/ 

#define TCNTL_LOAD 0x40 /* load tx fifo */ 

#define TCNTL_SOC ENBL 0x20 /* start of cell enable */ 

#deflne TCNTL_ENAgLE 0x10 /* enable send from fifo */ 

#define TCNTL_COMMAND OxOf /* tx command */ 

/* transmit status register */ 
#deflne TSTAT REG 4 

#define TSTATFIFO FULL 0x80 /* tx fifo full */ 
#define TSTATFIFO HALF 0x40 /* tx fifo half */ 
#define TSTAT_FIFO_EMPTY 0x20 /* tx fifo empty */ 
#define TSTATMASK OxeO /* bits 0-4 unused */ 

#define MAXJNTRJTIME 200 

/* dma controller control/status */ 

#define DMACJNT PEND 0x00000001 /* Interrupt pending */ 
#define DMAC_ERR_PEND 0x00000002 /* error pending */ 
#define DMACJDRA1NING 0x0000000c /* draining D cache */ 
#define DMAC INT EN 0x00000010 /* interrupt enable */ 
#define DMACTFLlTSH 0x00000020 /* flush buffer */ 
#define DMAC_SLAVE ERR 0x00000040 /* slave error */ 
#define DMAC_RESET 0x00000080 /* reset DMA */ 
#define DMAC WRITE 0x00000100 /* 1 = memory write; 0 = 

*~memory read */ 
#define DMAC_EN_DMA 0x00000200 /* enable dma*/ 
#define DMACJEN CNT 0x00002000 /* enable counter */ 
#define DMAC_TC"" 0x00004000 /* terminal count */ 
#define DMAC_ALE AS 0x00100000 /* 1 « addr latch enb; 0 

*"= a3dr strobe */ 
#define DMAC_LANCEJERR 0x00200000 /* E channel error */ 
#define DMAC FASTER 0x00400000 /* fast access for D 

*~ channel */ 

#define DMAC_TCI_DIS 0x00800000 /* TC interrupt disable */ 
#defme DMAC_EN NEXT 0x01000000 /* enable next */ 
#define DMAC_DMA_ON 0x02000000 /* DMA on */ 
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#defme DMAC A LOADED 0x04000000 /* address loaded */ 
#deflne DMAC~fsiA LOADED 0x08000000 /* next address loaded */ 
#define DMAC_DE\?JD OxfOOOOOOO /* device Id*/ 

#define DMAC INTR MASK 0x00000003 /* DMAC Interrupt 

r pending mask */ 

/*dma address */ 

#define DMAC_ADDR_REG 6 

/* dma next address */ 

#define DMAC_ADDRNXT_REG 7 

4 

/* dma count */ 

#define DMAC_COUNT_REG 8 

/* dma next count */ 

#define DMAC_CNTNXT_REG 9 

#define SWJMUM SWREGS 10 /* number of registers on sw 

* nlu */ 

#define NUM_SWREGS 3 /* number of registers on sw 
*niu*/ 

#define NUM_SWINTR 1 /* number of Interrupts on sw 

* nlu */ 

struct niu_addr_reg { 
u_char *rcntl_reg; /* receive control register */ 
u_char *rstat1_reg; /* receive status 1 register */ 
u_char *rstat2_reg; /* receive status 2 register */ 
u_char *tcntl_reg; /* transmit control register */ 
u_char *tstat reg; /* transmit status register */ 

}; 

struct niu_value_reg { 
u_char rcntlreg; /* receive control register */ 
u_char rstatl reg; /* receive status 1 register */ 
uchar rstat2_reg; /* receive status 2 register */ 
u_char tcntl_reg; /* transmit control register */ 
u_char tstat_reg; /* transmit status register */ 

}; 

struct hw_niu_reg { 
ujong " *dma reg;/* LSI dma status register */ 
u_short *attn7eg; /* nlu attention register */ 
ujong *base_reg; /* niu base register */ 
ushort *intr reg; /* niu Interrupt acknowledge 
* register */ 

ushort *lock_reg; /* niu dma lockout register */ 
ujong dma_yalue; /* local copy of dma status 



■ 
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* register */ 

u_short attnj/alue; /* local copy of niu 

* attention register */ 

ujong base_value; /* local copy of niu base 

* register */ 



struct dmac_addr_reg { 
ujong *status_reg; /* status control register */ 
ujong *addr reg; /* address register */ 
ujong *nexfaddress reg; /* next address register */ 
ujong *count_reg; /*~count register */ 
ujong *next_count reg; /* next count register */ 



#deflne NUMJDESC 1 /* up to 1 descriptors In 

* "chain */ 
typedef struct { 

caddr t dma_addr; 
Int size; 
} DMAJDESCJBUF; 

struct dmac_value_reg { 

ujong status_reg; /* status control register */ 

ujong addr_Feg; /* address register */ 

ujong next_address reg; /* next address register */ 

ujong count j-eg; /*~count register */ 

ujong next_cbunt reg; /* next count register */ 

}; 

« 

struct niu_stats { 
ujong ip_opkts; /* number tx ip packets */ 

ujong lp~ipkts; /* number rx ip packets */ 

ujong arp_opkts; /* number tx ip packets */ 
ujong arpjpkts; /* number rx ip packets */ 
ujong drv~opkts; /* number tx driver packets */ 
ujong drvjpkts; /* number oc driver packets */ 
ujong crc~errors; /* total number crc errors */ 
ujong errors; /* total number misc errors */ 
ujong allocd Jailed; /* number of alloc jiesc 

* failures */ 

ujong finddesc Jailed; /* number of mismatched 
* tags */ 



/* packet direction */ 

#define NIU_RECEIVE 0 /* host receiving packets 

* from niu */ 

#define NIU JTRANSMIT 1 /* host trasmltting packets 

* to niu */ 
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typedef struct { 

Int Injise; 

int cmd tag; 

struct mbuf *m; 

Int num desc; 

caddr t desc addn 

DMA_T>ESC_BUF "*desc_ptr; 

cadd? t data addn 
} DMA D£3C; 

#def ine NUM JDIWADESC 1 1 

#define COMMAND_SIZE 16 

#define NO COMMAND 0 
#define RESET CMD 1 
#define STATUSJJMD 2 
#define CLR STATS CMD 3 
#define RX_BATA CMD 4 
#deflne TX_DATA CMD 5 
#define CLRJNTR* CMD 6 
#define RESET Q 13MD 7 
#define WORKjAffOUND CMD 8 
#define BOARDJD_CMD~ 9 

#define CMD INTR OFF 0x00 

#define CMD"~INTR~ON 0x01 

#define CMD~CRClAASK 0x06 /* frame level crc */ 

#define CMDCRC ADAPTIVE 0x02 

#define CMD_CRC SMDS 0x04 

#define CMD_CRC_NONE 0x00 

#define CMD AAL MASK 0x18 

#define CMDAAL4 0x00 /* default Is aaI4 */ 

#define CMD_AAL5 0x08 /* not yet implemented */ 

#define CMD_AAL_RAW 0x18 /* send raw cell ala s/w niu */ 

#define CMDJENABLE XONJCOFF 0x20 /* enable xon/xoff */ 

#define CMD_LOOP_VCl 0x40 /* loop rev frames at 960 */ 

typedef struct { 

u_char param[COMMAND_SIZE - 4]; 

u_short tag; 
u~char flags; 
u~char command; 

} *" COMMAND; 

typedef struct { 
u_char param[COMMAND SIZE - 8]; 

ujnt board Jd; 
u_short tag; 
uchar flags; 
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u_char command; 
} BID_CMD; 

typedef struct { 

caddrj dma addr; 

u_sho"rt vci; " 

u_short mid; 

ujshort size; 

u~char order_q; 

u_char rate_q; 

u~short tag; 

u_char flags; 

u~char command; 

} RXCMD; 

typedef struct { 

caddr_t dma addr; 

u_short vci; " 

u_short mid; 

u_short size; 

u_char order_q; 

u_char rate_q; 

u_short tag;" 

u_char flags; 

u_char command; 
} TX_CMD; 

#define CMD Q SIZE NUM DMA_DESC 

#define START CMD Q( q ) (&(fa)-> cmd_q[ 0 ])) 
#define CUR CMD C5"( q ) (&((q)->cmd_q[ (q)->cmd elem ])) 

#define END_CMD~Q( q ) (&((q)->cmd q[ CMD_Q SiZE - 1 ])) 

#define NEXT_CMD_Q( elem ) if (+ + (elerrij > = CMDl3_SIZE)\ 

(elem) = 0; " 

typedef struct { 

int cmd elem; 

COMMAND *cmd q; 
} CMD_Q; 

typedef struct { 

u_char crc_err; 

u~char par1ty_err; 

u~char buf ovr; 

u~char buTavail; 

u_char pkfdrop; 

u char ceirdrop; 

} ~ HWNIlTSTATS; 

typedef struct { 

u_short rx_packets; 
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u short tx packets; 
HWNIUSTATS ~ stats; 
u_char " reserved [6] ; 
} NIUSTATUS; 

typed ef struct { 

caddrjt cmd_start; /* command q start */ 

caddr~t cmd^end;/* command q end */ 

caddrjt done[_start; /* completed q start */ 

caddrjt done_end; /* completed q end */ 

caddr_t status start; /* status location */ 

} HOST_BA§E; 

#define MAP CMD Q 0 
#define MAP DONE Q 1 
#define MAP STATUS 2 
#define MAP BASE 3 
typedef struct "{ 



caddrjt base_dma; /* host base dma address */ 
caddrjt statusdma; /* status dma address */ 
caddrjt cmd_dma;/* cmd q dma address */ 
caddft done" dma; /* done q dma address */ 

} ^ DMA ADBR; 



/* board ids */ 
#define NIU REV2 0 
#define NIU~REV3 1 
#define PNIU REV1 2 
#define PNIU~REV2 3 
#define PIMIU~REV3 4 
struct niu_dev { 
u_char type; 

u_short tag; /* tag for each command */ 
CMD_Q cmd_q; /* command q */ 

CMD Q done_q; /* completed q */ 

NIU STATUS status; /* hw niu status location */ 
HOSJJBASE base; /* hdst/niu lo base structure */ 
DMA_ADDR dma addr; /* mapped dma address */ 
int priority; f* interrupt priority */ 

struct hw_niu_reg niu_reg; /* address of registers on 

* niu board */ 
struct niu stats stats; /* niu statistics */ 
DMA_DE5C descfCMD Q SIZE]; /* descriptor pool */ 
Int Intrjimeout; /* Interrupt timeout counter */ 
struct niu_addr~reg niu addr; /* address of registers on 

* niu board *7 

struct nlu_value reg niu value; /* contents of registers on 

* niu Board */" 

struct dmac addr reg dmac_addn /* address of registers on 

* DB4853A SBus controller */ 
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struct dmac value_reg dmac_value; /* contents of registers 

* on L64853A SBus 

* controller */ 

Int (*sendpkt) 0: /* hw specific routine to 

* send queued pkts */ 

Int (* reset) 0; /* hw specific routine to 

* reset hw * / 
#define NIU TYPE SW 1 
#define NIU~TYPE~HW 2 

u_short direction; /* receive or transmit 

* packets */ 

Int boardjd; /* niu board revision */ 

int Intrastate; /* Is in Interrupt state */ 

int post_ocbuf; /* count of rx buffers to be 

* posted */ 
struct Ifqueue sendq; 
Int macaddr[2]; 

}; 

extern struct nlu_dev nluJnfoQ; 

extern int cell_flag; /* set for trasmission of raw 53 byte 
* cells */ 

#define NIUJFUNIT_TOJOUNIT(lfunit) (atm^glob^atmiftifunltj.ati^pcif^pc num) 
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/* lm.c 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 



V 



#lfdef CERNEL 

#indude "ipc^def.h" 
#lnclude "net_def.h" 
#include < global def.h> 
#include < driver.fi > 

#undef Imjnft 

#else /* Ifndef CERNEL * 

#include <stdlnt.h> 
#include <global_def.h> 
#include <ITCJf.h> 
#include <drlver.h> 

#lnclude <RT if.h> 
#include <timer.h> 
#lnclude <RT_def.h> 
#include <enet_if.h> 
#include <net_def.h> 

#define ERRLOG prlntdbg 
#define printf printdbg 

#endif /* Ifdef CERNEL */ 



#lnclude u unipdu.h tt 
#lnclude "nnipdus.h" 
#lnclude M altask_gl.h" 
#include "slgtask gl.h" 
#include "svctaslT gl.h" 
#include "svcjf.hf" 
#lndude "snmp incl.h' 
#include "AAL ffh" 
#include "wdb If.h" 
#include "q.h" 
#include "bits.h" 
#lnclude Im-h" 

ImjcbJ *lmjnlt0; 
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#rfdef CERNEL 
#inc!ude <stdio.h> 

maln(argc, argv, environ) 

Int argc; 

char *argv[]; 

char **environ[l; 

{ 

tlNT32 generic; 

tlNT32 instance; 

tlNT32 status; 

tUINT8 testmode; 

generic = TID_LM; 
instance = 0; 

if ((status = SetTid(generic, instance)) != RT SUCCESS) { 

printfClm: SetTid Failed\n"); 
} else { 

Im_main0; 

} } 

#endif /* ifdef CERNEL */ 

Im mainO 
{ " 

Imtcbt *tcb; 
struct TimerBlock *tmr blk; 

tUINT32 *msg; " 

tlNT32 delay; 

tUINT32 timerid; 

tUINT32 timerarg; 

tcb = Im inltO; 
If (tcb - = NULL) { 

printfOm: init failed 1 *); 

return; 

} 

tmr_blk = tcb->tmr_blk; 
timerid = tcb->timerid; 
timerarg = tct»timerarg; 

while (TRUE) { 
delay = 0; 
while (delay < *= 0) { 

delay = TimerCheck(tmr blk, &timerid. &timerarg); 
if (delay < = 0) { 
lm_srvcjtimer(2); 

RTCJTimerSet(tmr_blk, (GetTimeO + (STGRAN)), 
timerid, timerarg); 
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} 

} 

msg « (tUINT32 *) ReqMsg(LM EX MSK, delay); 
if (msg I « NULL) { ~ " 

lm_srvc msg(msg); 

free(msg); 



} 



lm_srvcjimer(delay) 
tUINT32 delay; 

{ 

SETUP TCB; 



} 



I m_srvc_msg (msg) 

tITCJHEADER *msg; 



{ 



Int ret; 

Int lm crt cfgO; 

SETUPJTCB; " ~ 

ret = RT_SUCCESS; 

printf("lm_srvc_msg, MsgType = %d\r\n\ msg- > MsgType); 

switch (msg- > MsgType) { 
case TA_AALJND_RECEIVE: 

I m_srvc_aal_msg (msg) ; 

break; 
case U_DTIND: 

lm_srvc_svc_msg(msg); 
break; 

case SNMPAJWGMTGET: 
lm_srvc_mgmt get(msg); 
break; " 

case SNMPA_MGMT_VAUDATE: 
Im_srvc_n7gmt_validate(msg); 
break; 

case SNMPA_MGMT_COMMIT: 
lm srvc mgmt commft(msg); 
break; 

case SNMPA_MGMT GETNEXT: 
lm_srvcjngmt_getnext(msg); 
break* 

case SNMPA CHECWN MSG: 

SendProxyCheckinO^W_GetCardTypeO, 
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MHW_GetSlotldO); 

break; 
default: 

If ((msg->MsgType >= MSG WDB BASE) && 
(msg->MsgType <= MSG~WDB~TOP)) { 
wdb process msg(fm crt_cfg, nriig); 

} else {" 

ret = !RT_SUCCESS; 
goto err exit; 

} 

break; 

} 

return (ret); 

err exit: 
Teturn (ret); 

} 

lm_srvc_aal_msg(msg) 
tAALTAJNDJW *msg; 



{ 



Int ret; 

Imalancfgenqj *aal msg; 
tUINT32 pvcl; ~ 
tUINT32 vcl; 

aalmsg = (Im alan cfg enq_ t *) msg->FbcBuffer; 
ret = RT^SUCCESSr ~ 

vc! = ((Im atm hdr t *) & (msg->RxATM Hdr))->vci; 
pvcl = VCTjXTPVClm(vci); 

If (aal msg->lmi hdr.lh pdujype != NN PDU STATUS ENQ 1 1 
aal msg->lmrhdr.llf proto 1= NNI PROTOCOL II" 
pvcl I = NNI NAC VCl) { 
ret = IRT_S0CC£§S; 
goto err exit; 

} 

switch (aal msg->enq.elem type) { 
case ALAhTCFG_ENQ: 

ret = lm_srvc alan_cfg_enq(msg); 
break; 

caseLMI CONFIG_ENQ: 

ret = Im_srvc es cfg_enq(msg); 

break; 
default: 

goto err_exlt; 

break; 

} 

return (ret); 
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err exit: 
Tetum (ret); 

} 

Im srvc alan cfg_enq(msg) 
TaalTta IND RX *msg; 

{ " " " 
Int ret; 
Imalan cfg enqt *alan enq; 
tALANCFG ENQ *enq;~ 
tALANCFG~RESP *resp; 

tATMADDR paddrsfMAX PORTS PER SLOT]; 

tUINT32 in srvc; " " 

tUINT32 in"srvc mask; 

Int i; " ~ 

Int maxj)ort; 

ImportaddrJ tst; 

lm_port_t *port; 

Im mac_t *mac; 

qlinkj *link; 

Im mac_vlan_t *mv; 

tUlNT32 tx vci; 

tUINT32 rx_vd; 

tUINTS rx shelf; 

UJINT8 oTslot; 

tUINT8 rx_port; 

lm_prefix_t prefix; 

Imatm hdr t atm hdr; 

SETUP~TC6; 

ret = RT_SUCCESS; 

alan_enq"= (lm_alan_cfg_enq_t *) msg->Rx. Buffer; 
enq = &alan_enq->enq; 

in_srvc = 0; 

insrvcjnask = 0x80000000; 

maxport = MAX_PORTS_PER_SLOT > enq->num ports? 

enq->num_ports : MAX_PORTS_PER_SLOT; 
LM INIT_PORT ADDR(&tst, tcb->my node, tcb->my shelf, enq->slotid, 0); 
forTl = 0; i < max_port; !++){ 

tstaajannum =^~0; 

tstaa port = I; 

port = FIND PORT(tcb->port q, &tst); 
if (port I = NOLL) { 
mac = port- > mac; 
If (IIS EMPTY Q(port->pv_q)) { 
paBdrs[i] = tst; 
In srvc I = in srvc mask; 
} ~ " " 
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If (mac != NULL && ! I S_EMPTY_Q (mac- > mv q)) { 
link - HEAD_Q (mac- > mv_q) ; 
mv = (lm_mac_vlan_t *) link->data; 
tst.aa lannum « mv->mlid; 
paddrsfi] = tst; 
in srvc | = in srvc mask; 

} " " " 

} 

in srvc mask >>= 1; 
} ~ ~ 

atmjidr = *((lm_atm_hdr t *) & msg- > RxATM_Hdr) ; 
prefix « *((lm_prefixj *) £ msg->RxPrefbc); 
rx_vci = atm hdr.vci; 

tx_vci « (rx_vci & (~SIG_PVCI_MASK)) | PVCI TO VCIm(NNI SIG VCI); 
rx_shelf = VCI TO SHELFm(rx vci); 
rx_slot = VCI TO_BLOTm(rx_va); 
rx port = VCrTO_PORTm(rx_vci); 

BUILD_ATM_HDR(&atm hdr, tx vci); 

BUILD UCAST PREFIX^prefix, rx_shelf, rx_slot, rx_port); 

lm_send_alan_cfg (prefix, atm_hdr, enq->slotid, in_srvc, maxjDort, paddrs); 
return (ret); 

err_exit: 

return (ret); 

} 

!m_srvc_es_cfg_enq(msg) 
tAAL_T A J N D_RX *msg; 

int ret; 
lm_es_cfg_enq_t *es_enq; 
tCFGELEM *enq; 
lm_mac_t *mac; 
lm__port_t *port; 
tUINT32 rxvcl; 
tUiNT8 rx_shelf; 
tUINTB rx_slot; 
tUINT8 rx_port; 
tUINT32 tx vcl; 
lm_prefix_t prefix; 
im_atm_hdr_t atmjidn 
lm_rnacTaddr_t *mac addr; 
lm_port addr_t port_addr; 
I m_es_cf g_resp_t *resp; 
int ~ resp len; 
int i; " 

SETUP TCB; 



« 
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ret = RT_SUCCESS; 

es_enq = (Im_es_cfg enqj *) msg->Rx.Buffer; 

eriq = &es_enq->enq; 

mac_addr = &enq->afjny_address; 

atm hdr = *(flmjatmjidr t *) & msg- > RxATM_Hdr) ; 
prefbc = *((lm iprefbc t *) £ msg->RxPreflx); 
rx_vcl = atm Kdr.vcff 

tx vcl - (rx vci & (~SIG PVCI MASK)) | PVCI TO VCIm(NNI SIG VCI); 
rx_shelf = VCI TO SHECFm(oTvcl); " " ~ ~ 

rx_slot = VCI TO_3LOTm(rx_vci); 
rx port = VCrTO PORTm(rx vcl); 

UfljNIT_POFff ASDR(&port_addr, tcb->my_node, rx shelf, rx slot, 
rx_port)7 

port - FIND_PORT(tcb->port q.&port addr); 
mac = FIND MAC(tcb->mac q, mac addr); 
If (mac == NULL) { " 
mac - add_mac(mac addr); 
If (port != NULL) { " 
atch macjjortfmac, port); 
lm_dup_port_dflts(port f mac); 

} 

if (port 1= NULL && (port->mac != mac 1 1 mac->port != port)) { 
free_mac_port(port->mac, port); 
atch_mac^ort(mac, port); 

resp = Imbuild es cfg resp(mac, enq, &resp len); 
If (resp = - NULL) { " 

ret = !RT_SUCCESS; 

goto err exit; 

} 

BUILD_ATM HDR(&atm hdr, tx vci); 
BUILD^UCAST^PREFIX^prefDcTrx^shelf, rxjslot, rxjDOrt); 

ret = lm_send es_cfg_resp(prefix, atm hdr, resp, resp len); 
return (ret); ~ 

err_exit: 

. return (ret); 

} 

Im srvc svc msg(msg) 
lAALDSRBlSG *msg; 

tLMHDR *lmljidr; 
tSETUP *setup; 
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} 



Imi hdr = (tLMIHDR *) & msg->U PDU; 
switch (Imi hdr->lh pdu type) { 
case SDUj&ETUPjfsID: " 

Im srvc" svc setup Ind(msg); 

break; " " 

case SDU_SETUP_COMP: 
break* 

case SDU_RELEASE_IND: 

lm_srvc svc rel ind(msg); 

break; 
default: 

break; 

} 



lm_srvc_svc_rel_ind(msg) 
struct svclf *msg; 



lm_srvc_svc_setup_ind (msg) 
struct svclf *msg; 



{ 



struct svclf *resp; 
tLMIHDR *lml hdr; 
tREL_REQ *re!T 
int respjen; 
Int ret; 
lm_mac_t *mac; 

lm_port t *port; 

lm_vlan_t *\4an; 
lm_mac~vlan t *mv; 
Immlidjt * mild; 
tSETUP *rxsetup; 
tSETUP *tx_setup; 
lm_portjaddr t port addr; 
lm_yc_addr X vc_addr; 
Im vc_t ~ *vc; 
tUlNT8 *vpcl; 
SETUPJTCB; 

ret = RTJ3UCCESS; 

resp len SVCIF PDU OFFSET + slzeof(*txsetup) + 

sEeof (struck lmT_parm); 
resp = (struct svclf *) ReqMsgMemZero(resp len); 
If (resp = = NULL) { 

ret = !RT_SUCCESS; 

goto err exit; 
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} 

rx_setup = (tSETUP *) & msg->lm!_hdr; 

tx_setup = (tSETUP *) & resp->!ml hdr; 

*tx setup = *rx setup; 

Imfhdr = (tLMIflDR *) & tx_setup->lml hdr; 

lmijidr->lh_pdujype = SDU SETUP fiESP; 

port_addr =Trx setup- > lmi_cafler; 

mlid = port_addr.aa_lannum; 

port_addr.aI lannum = 0; 

port « FIND>ORT(tcb->port q, &port addr); 

if (port = = NULL) { 

ret = IRT_SUCCESS; 

goto err exit; 

} 

mac = port- > mac; 
If (mac = = NULL) { 

ret - !RT_SUCCESS; 

goto err exit; 

> 

mv = FIND_MUD(mac->mv q, mlid); 
ff (mv = = NULL) { 

ret = !RT_SUCCESS; 

goto err exit; 

} 

vlan = mv->vlan; 
if (vlan -« NULL) { 

ret = !RT_SUCCESS; 

goto err exit; 

} 

LMJNIT_VC_ADDR(&vc_addr, vlan->vlan id, &rx setup->lmi callee); 
vc = FIND_VC(vJan->vc q, &vc addr); ~ ~ 
If (vc = = NULL) { 

vc = add_vc(&vc_addr); 

if (vc - = NULL) { 
ret « !RT_SUCCESS; 
goto err exit; 

} 

vc->ref cnt+ + ; 

vpci - ftUINT8 *) tx setup + sizeof(*tx setup); 
LMI_ADD_ELEMENT^vpci f LMI_OVPCI, vc->b!d); 

lmljidr->lh_cref_type | = LMI_CREFD!RECTION MASK; 
ret = lm_send_svc_msg(resp,"respjen); 

return (ret); 

err_exft: 

if (resp ! = NULL) { 
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lmijidr->lh_cref_type |= LM1 CREFDIRECT10N_MASK; 
lm_send svcj-elj-eq0mi_hdr,TNVAUD STATE); 
free(respj; 

} 

return (ret); 



} 



# 
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/* lm.h 



* 



* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

V 




#lfndef LM H 
#defme LMjH 

#define LM VB QUIET (0) 
#deflne LM~VB~ERRS (1) 
#define LM"WtERSE (2) 
#define LM VB VERBOSE (3) 
#define LM VB_MSGS (4) 
#define LM_VB_ALL (999) 

#define CHK_VB(level) (tcb-> verbose > = level) 

#define LM MAX VLAN NAME (17) 
#define LM I INDENT " (2) 
#define LM DFLT MTU SIZE (9100) 
#define LM DFLT~NUM MCASTS (4) 
#define LM MAX MUD (256) 
#define LM MAX~BID (1024) 
#define LM MAX MID (1024) 
#define MAR SLOTS (16) 
#define MAX~PORTS PER SLOT (8) 

#define MAX~PORTS~ (MAX SLOTS * MAX PORTS PER SLOT) 
#define LM AAL EX (EX INDICATION) ~ " " 
#define LM"AAL"EX MSK" (M EX INDICATION) 
#define LM~START v"CI (0x3000)" 
#define LM END VCl (0x3fff) 
#define LM INSTANCE (0) 

#deflne LM AAL SID (MAKE SSID(TID LM. LM INSTANCE, LM AAL EX)) 
#define LM EX MSK (M EX~INDICATfON) " " " 

#define SIZl MID BITS lLM~MAX MID / (8 * SIZE BITS)) 
#define SIZE MUD BITS (LM - MAX" MUD / (8 * SIZE BITS)) 
#define SIZE BID_B"ITS (LM MAX "BID / (8 * SIZE BITS)) 
#define LM_OLR_MAC_ADDRTmaddT)\ 

((maddr)->aa long[0] = (maddr)->aa long[1] = 0, (maddr)->aa type = AAT MAC) 
#define LM CLR_PORT ADDR(paddr)\ ~ ~ " 

((paddr)->aa long[or= (paddr)->aa long[i] = 0, (paddr)->aa type = AAT PORT,\ 
(paddr)->aa_country = USA) 
#define LM CLR_VC_ADDR(vcaddr) \ 

((vcaddrp>vlan_ld = 0. LM CLR_MAC_ADDR(&((vcaddr)->mac addr))) 
#define LM INIT PORT ADDRlpaddr, node, shelf, slot, port) \ 

(LM CI_R_PORT_ADDR(paddr),\ 

(paddr)->aa_node = node, (paddr)->aa_shelf = shelf, (paddr)->aa_slot = slot,\ 
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(paddr)->aa_port = port, (paddr)->aa lannum = 0) 
#define U/IJNIT_MAC ADDR(maddr, mac addr)\ 
((maddr)~>aajong(oj = (mac_addr)->aa_long[0], \ 
(maddr)->aaJong[1] = (mac addr)->aa_long[1], \ 
(maddr)->aa~~type = AAT MAC) 
#define LMJNI"TVC ADDR(vcaddr, vid, maddr)\ 

(LM_CLR_VC ~ADDR(vcaddr), (vcaddr)->vlan id - (vid),\ 
LM INIT MAC_ADDR(&((vcaddr)->mac_addr) ( maddr)) 
#define LM TsJUM ELEM(ary) (sizeof (ary) / slzeof ((ary) [0])) 
#define BUILD Jf£H(Hdr, len, generic, Instance, exch, mtype, mytld) \ 

{Hdr.Length=len; \ 
Hdr.Dest.Label.Pld =0; \ 
Hdr.DestLabeLSid = \ 

MAKE SSID(generic,instance,exch);\ 
Hdr.Dest.Ner= LOCAL NET; \ 
Hdr.Dest.Node = LOCAL NODE; \ 
GetPld(&Hdr.Orig.Label.Pkl); \ 
Hdr.Orig.Ubel.Sld = \ 
MAKE_SSID(mytld.GenerIc, 0, EX_INDICATION);\ 
Hdr.MsgType « mtype;} 



typedef tUINT32 Inrwnlld t; 
typedef tUINT32 lm_bid_j; 
typedef tUINTl6 ImjrfanJdJ; 

typedef struct lm_prefix_s { 

unsigned pri:2; 

unsigned tag_a:6; 

unsigned filH :2; 

unsigned rp:1; 

unsigned nrc:1; 

unsigned cos:4; 

unsigned 1112:1; 

unsigned br:1; 

unsigned vem:1; 

unsigned mb:1; 

unsigned tag_b:4; 

unsigned fiII3:2; 

unsigned. tag_c:6; 
} Im prefix~t; 

#define SIZE_CM_PREFIX (sizeof(lm_prefixJ)) 

#define CLR_PRERX(pfo<) (*((tUINT32*)(pbc)) = 0) 

#define BUILD UCAST PREFIX(pfx, shelf, slot port)\ 

(CLR_PREFiX(pfx), (pfx)->tag a = shelf, (pfc)->tag b - slot, \ 
(pfx)->tag_c = port, (pfx)->rp = 1) 

/* Fix RPA 10 Mar 92 */ 



I 
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#define BUILDJWCAST PREFIX(pfr, bid)\ 

(CLR_PREFIX(pfx), (pfe)->br = 1, (pfr)->tag a = (((bid) & OxfcOO) >> 10),\ 
(pfx)->tag_b = (((bid) & 0x03c0) >> 6), (plx)->tag_c = ((bid) & 0x003f)) 

typedef struct Im atm hdr s { 

unsigned ~gfc:4; 

unsigned vpi:8; 

unsfgned vcl:16; 

unsigned pt:2; 

unsigned rsvd:1; 

unsigned cip:1 ; 
} lm_atm_hdr t; 

#define SIZE_LM_ATM_fiDR (sizeof(lmjitmJidr_t)) 

#define CLR_ATM_HDR(hdr) (*((tUINT32*)(hdr)) = 0) 
#define BUILD ATM HDR(hdr, the vcl)\ 
(CLR_ATM_RDR(ficlr), (hdr)->vcT = the_vci) 

typedef struct Im alan cfg enq_s { 

struct Iml hdr~lmi hdr;" 

tALANCFSjENQ ~enq; 
} lm_alan cfg_enqt; 

#define SIZE^LM^ACAN^CFGlENQ (slzeof(lmjilan_cfg_enqj)) 

typedef struct lm_aian cfg resp s { 

struct Imi hdr Imi Tidr;"" 

tALANCFS ENQ "enq; 

tALANCFG_RESP resp; 
} lm_aian cfg_resp t; 

#define SIZEJJW_ADW_CFG"RESP (sizeofflmjilan_cfg_respj)) 

typedef struct Im es_cfg_resp s { 

struct Imi hdflmi hdr; 

tCFGELEM enq; 

tCFGELEM resp; 

tPORT_CFGELEM paddr[1 ] ; 
} Im es cfg resp_t; 

#define SIZEJ3A3SjEFG_RESP (sizeof0mj>s_cfgj-espj)) 

typedef struct lm_es cfg enq_s{ 

struct Imijidr ImThdr; 

struct config_elem enq; 
} lm_es_cfg enqj; 

#define SIZE_LM_ES_CFG_ENQ (sizeof0m_es_cfg_enqJ)) 

typedef struct atm_addr lm_mac addr t; 

#define SIZE_LM_MAC_ADDR ~(sizeofflm_macaddr t)) 

typedef struct atm_addr lm_port addr t; 

#define SIZE_LM_PORT_ADDR ~ (slzebfflm_port_addrJ)) 
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typedef struct lm_vc_addr s { 

I m_vianjd_t vlanjd f 

struct atm addr mac addr; 
} Imj/c addft; 

#define SIZEJJWjVC_ADDR (sizeofflmj/cjiddrj)) 

* 

#define aa_country aa_u.aaw.aasw nlbb!e2 
#define aa_shelf aa_u.aaw.aaswjiib6le3 
#deflne aa_slot aajj.aaw.aasw_nibble4 
#define aa~port acTu.aaw.aasw_nibble5 

typedef struct lm_tcb_s { 

tTID mytid; 

tPID mypid; 
struct TimerBiock *tmr blk; 
tUINT32 time rid;" 
tUINT32 timerarg; 
tATMADDR nac atm addr; 
tUINT32 nacjd; " 
tAAL KEY my aa! key; 
tUINT32 my node; 
tUINT32 my~shelf; 
tUINT32 my~slot; 
Im port addrj port tmplt; 
tUINT32~ curbid; 

bits_t bid bits[SlZE_BID_BiTS]; 

bits t mli3_bits[SIZE_MU DEBITS] ; 
tUiK}T32 dfltjntu size; 
tUINT32 dflt nunTmcasts; 
tUINTT32 verBose; 
tlliNT32 do_cfg wits; 

char vc_addrT3uf[200J; 

char mac_addr buf[slzeof(lm_mac_addrj) * 3 + 1]; 

char poit_addrT)uf[40]; 

char v!anjdj)uf[10]; 

queue_t port_queue; 

queuej vlan_queue; 

queuej mac_queue; 

queuej mv_queue; 

queuej pvjjueue; 

queuej vc_queue; 

queuej *port q; 

queued *viarTq; 

queuej *mac~q; 

queue t *mv q; 

queuej *pvjq; 

queue t *vc_q; 
} ImjcbJ; 
#define SIZEJLM TCB (sl2eof(lm tcb t)) 
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typedef struct Im mac s { 

qlinkj macjlnk; 

queue J mv~queue; 

queuej *m\Tq; 

struct lm_port_s *port; 

Imjnac addrl mac addr; 

bits J ~ mild bltsfSlZE MUD BITS]; 
} Im mac t; 

^define SIZEJJdJdAC (sizeof(lm_macJ)) 

typedef struct Im_v1an s { 
qlinkj vlan Jink; 
queuej pvjjueue; 
queuej *py_q; 
queuej my queue; 
queuej *mv~q; 
queuej vcjjueue; 
queuej *vc_q; 
queuej free vc queue; 
queuej ^ree~vcji; 
Im vfan idj vlan Id; 
tU(NT32" mtujsize; 
tUIIMT32 num m casts; 
lm_mlidj dflt_mlid; 

char vlan namefLM MAX VLAN NAME]; 

bits J mldJblts[SI2E IDlID SITS]; ~ 

} Im vlan t; "~ 

#deflne SIZEJ.MJ/LAN (sizeof(lm_vlanJ)) 

typedef struct lm_port_s { 

qlinkj portjlnk; 

lmj>ort_addrj port_addn 

Imjnacj *mac; 

queuej pvjjueue; 

queue t *pv_q; 

bftsj " m!idj3its[SIZE_MUD BITS]; 
} Imjjort t; 

#deflne SIZEJJW_PORT (slzeof(lmj>ortJ)) 

typedef struct Im vc s { 

qlinkj vcjlftk; 

qlink t vlan Jink; 

ImjdanJ *vlan; 

lm_vc acldrj vc addr; 

ImJMfft bid;" 

tUINT32 ref cnt; 
} lm_vcjr 
#define SIZEJJW_VC (sizeof(lm_vcJ)) 
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typed ef struct lm_port vlan_$ { 



qlink t 
qlinkj 
qlink t 
Im_vlan_t 
lm~port t 
Im^mlicTt 



pvjlnlc; 
port link; 
vtan~Hnk; 
*vlan; 
*port; 



} 



Imjtenjdj vlan Id; 
lrn_port_addr_t port addr; 
Im port vla"n t; 



#define SIZE^LM^PDRTVLAN (sizeofflmj)ort_vlanJ)) 
typedef struct lm_mac_vtan_s { 



qlink t 
qlink~t 
qlinkj 
ImjnacJ 
Im vlan~t 



mvjink; 
mac link; 
vlanjink; 
*mac; 



} 



*v!an; 

I m j/lan Jd J vlan Jd ; 
lm_mac_addr t mac addr; 
tUINTlS "mid; ~ 
Im mlid t mild; 

Im mac vlan t; 



#define SIZEJJWJAACJftAN (sizeofflmjnacj/fanj)) 

typedef struct lm_cfg_glbl_s { 

tUINT32 dflt mtu_slze; 

tUINT32 dflfVium_mcasts; 
} Irncfg glblt; 

#define S IZE_LM_CFG_GLBL (sizeof(lm_cfg_glbr t)) 

typedef struct Im cfg vlan s { 
tUINT32 "dfltjmlidr 
tUINT32 numjncasts; 
tUINT32 mtu_size; 

char vlan_name[LM MAX_VLAN JJAME] ; 

} Im cfg vlan t; 

#define SIZEJJVI_CFG VLAN (sizeofflm cfg vlan t)J 



typedef struct lm_cfg port s { 

tUINT32 el tonto; 
} Im cfg "port t; 

#define SIZEj3tf_CFG_PORT 

typedef struct Im cfg mac s { 

tUINT32 "eljontof 
} lm_cfg~mac t; 

#define SIZEJ-MJ^FGjflAC 

typedef struct lm_cfg_pv_s { 



(sizeof(lm_cfg_portJ)) 



(slzeof0m cfg macj)) 
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tUINT32 mild; 
} Im cfg pv t; 

#define SIZEj3tfjSFG~PV (slzeofflm_cfg_pvJ)) 

typedef struct Im cfg mv s { 
tUINT32 "mlia- " 

> Im cfg mv t; 

#define SIZEjJ/IJTFGlVIV (sizeofflmjrfgjnvj)) 

typedef struct Im cfg vc s { 

tUINT32 "eljonto; 
} lm_cfg vc t; 

#define SIZEJJW_CFG~ VC (slzecf(lm_cfg_vcj)) 

typedef struct Im glbl cfg key s { 
tUINT32 "tog" " " 

> lm_glbl cfgjcey t; 

#define SI2E_LM_(5LBL_CFS_KEY (sfceof0m_glbl_cfgj<eyj)) 

typedef struct Im vlan cfg key s { 

tUINT32 ""tag;"" " " 

lm_vlanjd_t vlan id; 
} ~ lm_\rfan_clg_key t; 

#define SI2E_LM_VLAN_CF(S^KEY (sizeofflmj/tan_cfgJ<eyJ)) 

typedef struct Im port cfg key s { 

tUINT32 tag;" " ~ 

lm_port_addr_t port_addr; 
} lm_port cfgjcey t; 

#deflne SIZE_LM_pDRT_CFG_KEY (sizeofflmjDortjrfgJceyj)) 

typedef struct Im mac cfg key s { 

tUINT32 lag;" " ~ 

lm_mac_addr_t mac addn 
} Im mac_cfg"key_t; 

#define SIZEjl/IJtf ACCFG_KEY (sizeof0mjnac_cfgj<ey_t)) 

typedef struct Im vc cfg key s { 

tUINT32 tag; " " 

lm_vc_addrjt vc_addn 
} ~ Im vc cfg keyt; 

#deflne SIZEJJ\ZI_VC_CFG_KEY (sizeofflmjrcjrfgjceyj)) 

typedef struct Im pv cfg key s { 

MJINT32 "tag;, " " 

lm_port addr t port addn 

lm_vianjd_t " vlanjd; 
} Im pv_cfg keyt; 

#define SIZE JJA PVCFG KEY (sizeofflm pv cfg key t)) 
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typedef struct lm_ mv cfg key s { 

tUINT32 tag" ~ ~ 

lm_mac addrjt mac addr; 

lm_vlanjd_t vfanJdT 
} " Im mv cfg key t; 

#define SIZE_CM_MV_CFGJ<EY (slzeof(lm_mv_cfg_key_t)) 

typedef union cfg key u { 

tUINT32 tag;" 

lm_glbl_cfg_key t glbl_key; 

lm~vlan_cfg_key^t vlan key; 

I mportcf g_key_t port~key; 

I m~mac~cf g_key~t ma<T key; 

lm~vc_cfg_key_t vc key; 

lm_py_cfg_key_t pv_key; 

I m_mv_cf g_key_t mv key; 
} ~ Im cfg key~t; 
#define S!ZE_LM_CFG_KEY (slzeof(lm_cfg_key_t)) 

#define NULLCFG KEY (0) 
#define GLBL CFG~KEY (1) 
#deflne VLAN~CFG"KEY (2) 
#deflne PORT" CFG - KEY (3) 
#define MAC CFG "REY (4) 
#define VC CFG REY (5) 
#define PV~CFG~KEY (6) 
#define MV_CFG~KEY (7) 

#ifdef UNIX 

extern tlNT8 *GlobalP; 
#undef printf 
#endif 



#define malloc(size) GetMem(size) 
#define free(ptr) FreeMem(ptr) 

#deflne FREE_Q(q, proc) ((int)traveree q(q. proc, NULL)) 
#define FREE MV Q(q) FREE Q(q, free mv) 
#define FREE_PV~Q(q) FREE~Q(q, free~pv) 
#define FREE_MA"C Q(q) FREE Q(q, free mac) 
#define FREE VLATT Q(q) FREE - Q(q, free'vlan) 
#define FREE_PORT~Q(q) FREE~Q(q, free~port) 
#define FREE_VC_Q7/q) FREE Q(q, free vc) 
#define FREE_PORT VLAN Q(q) FREE Q(q.Tree port vlan) 
#define FREE MAC VLAN ft(q) FREE~Q(q. free"mac~vlan) 
#define FREE~MAC MV <5fa) FREE t)(q, free mac mv) 
#define FREE VLAN" MV Q(q) FREE~Q(q, free"vlan"mv) 
#deflne FREE~PORT>V~Q(q) FREE~Q(q, free"port"pv) 
#define FREE_VLANPVQ(q) FREE Q(q, freej/lan pv) 
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#define ATCH_MAC_MV Q(q, mac) ((int)traverse_q(q, atchmacmv, mac)) 
#define ATCH_VLAN_M\yTQ(q, vlan) ((int)traverse q(q, atch vlan mv, vlan)) 
#define ATCH PORT PV Q(q, port) ((int)traverse"q(q l atch~porTpv, port)) 
#deflne ATCH"VLAN"P\TQ(q f vlan) ((int)traverseji(q, atchjdarTpv, vlan)) 

#define ATCH MV MAC_Q(q, mv) ((lnt)traverse q(q, atch mv mac, mv)) 
#define ATCH~MV~VLAN Q(q f mv) ((Intjtraverse q(q, atch""mv\lan, mv)) 

#define ATCH~PV"PORT~Q(q. pv) ((lnt)traverse q(q f atch pv port, pv)) 

#define ATCH~P\TVLANjQ(q, pv) ((int)traverse~q(q, atchjwjrian, pv)) 

#define FIND_MAC(q, mac) ((Im_mac_t*)traverse q(q, cmp mac, mac)) 
#define FIND_PORT(q, port) (flm_portJ*)traverseJq(q, cmpjiort, port)) 
#define FIND_VLAN(q, vlan) ((lm~vlan t*)traverse q(q, cmp^vlan, vlan)) 
#define FIND_VC(q, vc) ((lm_vc_t*Jtraverse q(q, cmp vc, vc)) 
#define FIND_MV(q, mv) ((lm_mac_vlan t*)Traverse_q(q l cmpmv, mv)) 
#define FIND_PV(q, pv) ((lm_port vian t*)traverse q(q, cmp_pv, pv)) 
#define FIND_MUD(q, mlid) ((Im^macjdanJ^traversi^qtq, cmpjnlid, mlid)) 

#define FINDNEXT_MAC(q, mac) (flmjnac t*)tiaverse_q(q, cmpnext mac, mac)) 
#define FINDNEXT PORT(q, port) ((lm port t*)traverse_q(q, cmpnext Jport, port)) 
#define FINDNEXT^VLANJq, vlan) ((lm"vlanl*)traverse_q(q f cmpnext vlan, vlan)) 
#define FINDNEXT_VC(q, vc) ((lm_vcj*)traverse q(q, cmpnext_vc, vc)) 
#define FINDNEXT MV(q, mv) (Om_mac_vian t*)Traverse q(q, cmpnext_mv, mv)) 
#define FINDNEXT"PV(q, pv) ((lm port vlanj*)traversejij(q, cmpnext_pv, pv)) 
#define FINDNEXf>!UD(q t mlid) T(im_mac_vlanJ*)traverse_q(q i cmpnext_mlid, mlid)) 

#define PUTQ_SORTED MACflink, q) (putCLSOrtedflink, q, qpscjnac)) 
#define PUTQ_SORTED PORT(link, q) (putq_sorted(link f q, qpsc port)) 
#define PUTQ_SORTED~VLAN(iink t q) (putq_sorted(!ink, q, qpsc vlan)) 
#define PUTQ SORTED^VC(link f q) (putq sorted(link, q, qpscvc)) 
#define PUTQ_SORTED_PV(link, q) (putqLSOrtedOink, q, qpsc pv)) 
#define PUTQ_SORTED_MV(link, q) (putq_sorted(link, q, qpscTmv)) 

#define PRINT_Q(q, proc, Indent) ((int)traverse_q(q, proc, indent)) 
#define PRINT_VLAN_Q (q, indent) PRINT_Q(q, print vlan, indent) 
#define PRINT_MAC_Q(q, indent) PRINT~Q(q, primjmac, indent) 
#define PRINT_PORT Q(q, Indent) PRINT_Q(q, print port, Indent) 
#define PRINTJ^Vjafa indent) PRINT Q(q, print pv, indent) 
#define PRINT_MV Q(q, indent) PRINT Q(q, prlnfmv, Indent) 
#define PRINT_VCjQ(q, indent) PRINT_Q(q, print~vc, indent) 

#define pGlobalData ((lmJcbJ*)GlobalP) 

#define DEFINEJTCB lm tcb t *tcb 

#define SETUP JTCB DEFINEjCB * pGlobalData 

extern struct Agent Msg *lm_cp_mgmt_msgO; 
extern lm es_cfg resp_t *lm build_es~cfg_/espO; 
extern InTmacj^addjnacfl; 
extern lm_portj *add_port(); 
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extern Im 
extern Im 
extern Im 
extern Im 
extern Im 
extern Im 
extern Im 
extern Im* 
extern Im' 
extern Im* 
extern Im" 
extern Im" 
extern Im" 
extern Im" 
extern Im" 
extern Im" 
extern Im" 
extern Im" 
extern Im" 
extern Im"" 
extern int" 
extern int 
extern Int 
extern int 
extern int 
extern int 
extern Int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern Int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern Int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 



i_vlan_t *add_vlanO; 
i_vcj *add vcO; 
_vc_t *get7ree_vcO; 
_vc_t *addQfree vc(); 
jnac_vlan_t *a<Td_mv(); 
_port~vlan_t *add_pvO; 
mac~t *cmp macO; 
""port! *cmp"portO; 
vlanj *cmp"~vlan(); 
~vc_t *cmp_vcO; 
port_vlan_t *cmp_pv(); 
mac_vlan_t *cmp mv(); 
"mac~vlan~t *cmp~mlidO; 
mac_t *cmpnext_macO; 
port_t *cmpnext_port(); 
vlan t *cmpnext_vianO; 
ycj""*cmpnext_vcO ; 
port_vtan_t *cmpnext_pv(); 
mac^vlarij *cmpnext mvQ; 
mac_ylan_t *cmpnexfmlld(); 
qpsc macO; 
qpsc^portO; 
qpsc_vlanO; 
qpsc_vcO; 
qpsc_pvO; 
qpsc^mvO; 
atch_mac_mv(); 
atchvlanmvO; 
atch_port pv(); 
atch_vlan""pv0; 
atch_pv_vlanO; 
atch_pv_port(); 
atchjrv/jTiacO; 
atch_mv vtanO; 
free macO; 
free^vlanO; 
free portO; 
free^vcO; 
free~port_vIan(); 
free_mac_vlan 0 ; 

free_mac_mvO; 
free_vlan1nvO; 
free_poitj>vO; 
freejdan pvO; 
free^mvflT 
free~pv(); 
print macO; 
prinTvlanO; 
print^portO; 
print_vcO; 



a. 
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extern int print_mv(); 

extern Int print pv(); 

extern char *spfiht mac addrO; 

extern char *sprinrport~addr(); 

extern char *sprinf vlanldO; 

extern char *sprinrvcJTddr(); 

extern struct TimerBlock *TimerlnitO; 
#endrf /* jfndef LM_H */ 
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/* lm cfg.c 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

V 



#ifdef CERNEL 

#lnclude "ipc def.h" 
#include "nef def.h" 
#include < global def.h > 
#lnclude <drlver.Ti> 



#undef Imjnit 

#else /* ifndef CERNEL */ 

#includs <stdlnt.h> 
#lnclude < global def.h > 
#lnclude <ITCJf.h> 
#include <drlver.h> 
#indude <RTJf.h> 
#include <tlmer.h> 
#include <RT def.h> 
#lnclude <enet ff.h> 
#include <net_def.h> 

#define ERRLOG printdbg 
#define printf printdbg 

#endif /* Ifdef CERNEL */ 

#include "unipdu.h 11 
#include "nnlpdus.h" 
#lnclude "altask_gl.h" 
#include "slgtask gLh" 
#include "svctaslT gl.h" 
#include "svcjf.h 11 * 
#include "snmp JncLh" 
#include "AAL Eh" 
#lnclude •wdb^ff.h" 
#lnclude "q.h"~ 
#lnclude "btts.h° 
#lnclude "lm.h" 



#define WDB VERS (1) 
^define WDB~PRI (1) 
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lm_chg_glbl_cfg(dfltjritu size, dflt num mcasts, nac addr, bfd bits, mlid bits) 
tUINT32 *dflt mtu size; " " ~ 

tUINT32 *dflrnunTmcasts; 
tATMADDR *nac addr; 
bits t *bid bltsf 
blts~t *mlicf bits; 

{ 

SETUPJTCB; 

If (dflt_mtu_size I = NULL) { 

tcb->dflt_mtu_size = *dflt_mtu_slze; 

(dflt_num_mcasts I = NULL) { 
tcb->dflfnum_mcasts = *dflt_num_mcasts; 

(nac_addr ! = NULL) { 
tcb->nac_atm_addr = *nac_addr; 

(bid_bits ! = NULL) { 

bcopy(bid_bits ( tcb->bid_bfts f sizeof(tcb->bid_bits)); 
(mlid_bits ! = NULL) { 

bcopy(mlid_bits, tcb->mlid_bit$, sizeof(tcb->m»d_bits)); 
fm_wrt_glbl_cfgO; 



} 

lm_chg_vlan_cfg(vlan, dflt mlid, num mcasts, mtu size, vlan name) 

Imvlant *vian; ^ " ~ 

tUINT32 *dfft_mlid; 

tUINT32 *num mcasts; 

tUINT32 *mtulize; 

tUINT32 *vlan name; 



{ 



qlinkj *Iink; 
lm_mac_t *mac; 
Im mac vlan t *mv; 
SETUPJTCBf 

If (dflt mlid I = NULL) { 

if (*dfit_mlid > = LM_MAX_MUD 1 1 

lbitrtst_bft(*dflt_mlid f tcb->mlid bits, SIZE MUD BITS)) { 
if (vlan- > dflt mlid < LM MAX MOD) { " ~ 
bfts_free_T>ft(vian->dflt mlicJ, tcb->mlid bits, 
SIZE MUD BITS); 
} ~ " 

If (*dflt_mlid < LM MAX MUD) { 

bits allocJbft(*dflt_mfTd f tcb->mlid bits, 
SIZE MUD BITS); 
} " 
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vlan->dflt mlid = *dflt mlid; 

} 

} 

If (num_mcasts I = NULL) { 

chg^num^vcsfvlan, *num_mcasts); 

ff (vlan_name I = NULL) { 
int namejen; 

namejen » strien(vlanjiame); 

namejen = (name len < LM MAX VLAN NAME) ? name len : 

LM MAXJ/LANJNAME - 1 f ~ 
bcopyfvlanjname, v1an->vtan name, name len); 
vlan- > vlannamefnamejen] = 0; 

If (mtusize ! = NULL) { 

vlan->mtu size = *mtu size; 

} 

lm_wrt vlan_cfg(vlan); 

for (link = HEAD_Q(vlan-> mv q); link ! = NULL; 
link = Ilnk->next) { 
mv = (lm_mac_vlanj *) link- > data; 
mac = mv- > mac; 
If (mac I = NULL) { 

lm_send_es_cfgjnd(mac); 

} 

} 

lm_chg_port_cfg(port, mac_addr, mlid_brts) 
lm_port_t *port; 
lm_mac_addrj *mac addr; 
bitsj *mlidj>its; 

Im mac t *mac; 
SETUPTCB; 

If (mac_addr I = NULL) { 
If (port->mac I- NULL) { 
mac = port- > mac; 
free mac(mac); 

} 

mac = add_mac(mac_addr); 
atch_macJ5brt(mac, port); 
lmjjup_port_dflts(port, mac); 

If (mlidjDlts != NULL) { 

bcopy(mlid_bits. port->mlidJ)fts, slzeof(port->mlid_blts)); 

lmjwtjDort_cfg(port); 
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} 

lm chg_mac_cfg(mac l mild bits) 
im_mac t *mac; 
bits t *mlld bits; 

{ 

SETUPJTCB; 

If (mlidjDfts ! = NULL) { 

bcopy(mlid_bfts, mac->mlld_blts t sizeof(mlId_blts)); 

^ I m_wrt_mac_cf g (mac) ; 

lm_chg_vc_cfg(vc, bid, ref cnt) 
Im^vc t *vc; 
Im bidj *bid; 
tUlNT32 *ref cnt; 



{ 



SETUPJTCB; 

if (bid! = NULL) { 

If (!bbsjstjbit(*bid a tcb->bld_bits. SIZEBID BITS)) { 
bits Jree_bit(vc-> bid. tcb->bid bits, SIZE~BID BITS); 
bits_alloc_bit(*bid, tcb->bld bfTs, SIZE BID BITS); 
vc->bid = *bid; " ~ " 

} } 

if (ref_cnt I = NULL) { 
vc->ref_cnt = *ref_cnt; 

lm_wrt_vc_cfg(vc); 



lm_chg_pv_cfg(pv, mlid) 
im port"vlan t *pv; 
tUINT32 ~*mlid; 

{ 

lm_port t *port; 
SETUPlTCB; 



port « pv->port; 

If (mild ! = NULL && port 1= NULL) { 

If (!bftsjst_bft(*fnlid, port->mlid bits, SIZE MUD BITS)) { 
bits _free_bft(pv-> mlid, port->mlId bits, SIZE MUD BITS); 
bits_alloc_bft(*m!id, port->mlld bits, SIZE MtlD BlTS)- 
pv->miid = *mlid; " 

} 

} 
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im_wrt_pv_cfg(pv) ; 

lm_chg_mv_cfg(mv, mild) 
lm mac "vlan t *mv; 
tUlftT32~ "*mlid; 



{ 



lm_mac t *mac; 
SETUP TCB; 



mac = mv->mac; 

If (mlid != NULL && mac 1= NULL) { 

If (!bits_tst bft(*mlid, mac->mlid_bits, SIZE MUD BITS)) { 
bltsjreej3lt(rnv->mlid, mac->mlid bits "SIZE T5/IUD BITS); 
bits_alloc_bit(*mHd, mac->mlid bits, SIZE MOD BlfS); 

m\/_ >v mli/H AmlMi *~ — "~ 



} 

lm wrt_mv__cfg(mv) ; 
If (mac 1= NULL) { 

lm_send_es_cfg_lnd(mac); 

} 

lm rm glbl cfgfl 
{ ~ " ~ 

I m_gl bl_cf g_key_t key; 

Imcfg glbl t cfg; 

SETUP" TCB; 



} 



key.tag = G LB L_CFG_KEY; 
wdbsendj-emove^noac^&key, sizeof (key)) ; 



lm_rm_vfan_cfg(vlan) 

lm vlan t *vian; 
{ " ■ 

lm_vlan_cfg_key_t key; 

lm cfg vlan t cfg; 

SETUPJTCB; 

key.tag = VLAN CFG KEY; 
key.vlanjd = vlan->vlanjd; 

wdb_send_remave_noack(&key, sizeof (key)); 



lmjm_port_cfg(port) 
lm_port_t *port; 
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{ 

lm_port_cfg_key t key; 
IrrTcfg port t cfg; 
SETUPJTCB; 

key.tag = PORT_CFG_KEY; 
key.port_addr = port->port_addr; 

wdb_send_remove_noack(&key f slzeof(key)); 

lm_rm_mac_cfg(mac) 

Im "mac t *mac; 
{ " 

lm_mac_cfg_key t key; 

lm~cfg mac t cfg; 

S£TUP~TCB7 

key.tag = MAC_CFG_KEY; 
key.mac_addr = mac->mac_addr; 

wdb_send_remove_noack(&key, sizeof(key)); 

I m_r m_vc_cf g (vc) 

Im vc t *vc: 
{ " " 

lm_vc_cfg_k©yj key; 

Imcfg vc t cfg; 

SETUPJTCB; 

key.tag « VC CFG KEY; 
key.vcaddr « vc->vc_addr; 

wdb_send_remove_noack(&key, sizeof(key)); 



lm_rm_pv_cfg (pv) 

Im port vfan t *pv: 
{ " " " 

Imjwcfg key t key; 

Imcfg pv~t "cfg; 

SETUPJTCB; 



key.tag = PVCFG_KEY; 
key.port_addr = p\T>port addr; 
key.vlanjd = pv->vlanjd7 

wdb_sendj-emove_noack(&key, sizeof(key)); 
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lm_rrn_rnv_cfg(mv) 
lmjmac_vlan_t *mv; 



{ 



} 



lm_mv_cfg key_t key; 
Im cfg mv"t cfg; 
SETUPJTCB; 

key.tag = MV_CFG_KEY; 
key.mac addr = mv->mac addr; 
key.vlarfld = mv->vlan_idr 

wdb_send_remove_noack(&key, sizeof (key)) ; 



lmjA/rt_g!bl_cfgO 

lm_glbl_cfg_key t key; 
Im cfg glbl t c?g; 
SETUPJTCS; 

ff (tcb->do_cfg_wrts) { 

key.tag = GLBL_CFG_KEY; 

cfg.dflt_mtu_size = tcb->dflt_mtu_size; 
cfg.dflt_num_mcasts = tcb->dflt_num_mcasts- 
wdb_send_store_noack(&key, sizeof(key), &cfg, sizeoffcfq), 
WDB_VERS, WDB_PRI); W 

} 

Im_wrt_vlan_cfg(v1an) 

Im vlan t *vlan: 
{ " ~ 

lm_vlan_cfgj<ey_t key; 

lm_cfg vlan t cfg; 

SETUPJTCB; 

if (tcb->do_cfg wrts) { 

key.tag = VCAN_CFG KEY; 
key.vlanjd = vlan->vlanjd; 

cfg.dflt_mlid = vlan->dfit mild; 
cfg.numjncasts = vian->num mcasts; 
cfg.mtu size = vlan->mtu_slz£ 

bcopy(vTan->v!an_name f cfg.vlarwiame, sizeof(cfg.vlan name)) 
wdb_send_store_noack(&key, sizeof(key), &cfg, sizeof(cfg), 
WDB VERS, WDB PRI); 1 W 
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lmjwt_port_cfg(port) 
lm_port_t *port; 

lm_port_cfg key_tkey; 
Imcfg porft cfg; 
SETUPJTCB; 

If (tcfch>do cfg wits) { 

key.tag = PORT_CFG _KEY; 
key.port_addr = port->port_addr; 

cfg.el tonto = 0; 

wdbsend store noack(&key, sizeof(key), &cfg, sizeof(cfg), 

WDB^VERS, WDB_PRI); 

} 

lm wrt mac cfg (mac) 

lm mac t *mac: 
{ " " 

lm_mac_cfg_key_t key; 

lm cfg mac t cfg; 

SETUP"" 



} 



If (tcb->do_cfg_wrts) { 

key.tag = MAC_CFG_KEY; 
key.mac_addr = mac->mac_addr; 

cfg.el_tonto = 0; 

wdbsend store noack(&key, sizeof(key), &cfg, sizeof(cfg), 
WDB_VERS, WDB_PRI); V W 



lm_wrt_vc cfg(vc) 
lm_vc f *vc; 



{ 



lm_vc_cfg_key t key; 
lm_cfg vc t "cfg; 
SETUP~TCB; 

If (tcb->do cfg wrts) { 
key.tag = VC CFGJCEY; 
key.vc_addr = vc->vc addr; 

cfg.el_tonto = 0; 

wdbjjend_store_noack(&key, sizeof(key), &cfg, sizeof(cfq) 
WDB_VERS, WDB_PR|); * V9/» 
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} 

lm wrt pv cfg(pv) 

port vlan t *pv; 
{ " " " 

lm_pv_cfg key t key; 

fmcfg pv~t ~cfg; 

SETUPjr<?B; 

If (tcb->do_cfg wrts) { 
key.tag « P? CFG KEY; 
key.port^addp * p\£>port addr; 
key. vlan Jd = pv->vjanJdT 

cfg.mlid = pv->mlid; 

wdb_send_store noack(&key. sizeof(key), &cfg, sizeotfcfg), 

WDB_VERS. WDB_PRI); 

} 

lmjvrt_mv_cfg(mv) 

lm mac vlan t *mv; 
{ ~ ~ ~ 

lm_mv_cfg_key t key; 

Imcfg mv t ~cfg; 

SETUP~TCB; 

rf (tcb- > do_cfg_wrts) { 
key.tag = MV_CFG_KEY; 
key.mac_addr = mv->mac addr; 
key. vlan Jd = mv->vlanjd; 

cfg.mlid = mv->mlld; 

wdb_send_store noack(&key, sizeof(key), &cfg, slzeotfcfa). 

WDBjfERS, WDBPRI); V W 



} 



lm_crt_cfg(key, Wen, cfg, den) 
lm_cfg_key t *key; 
int Tden; 
t(JINT8 *cfg; 
Int den; 



{ 



switch (key->tag) { 
case NULL_CFG KEY: 

break; 
case GUBL CFG KEY: 

lm_crtjjlbi_cfg(key. cfg); 
break; 



WO 94/07316 



PCT/US93/08674 



lm_cfg.c 

-110- 

case VLAN_CFG_KEY: 

Import vtan cfg(key, cfg); 

break; 
case PORTCFGKEY: 

lm_crt_port cfg(key, cfg); 

break; 
case MACCFGKEY: 

lm_crt mac_cfg(key, cfg); 

break; 
caseVC_CFG KEY: 

lm_crt_vc_cfg(key, cfg); 

break; 
case PV^CFG KEY: 

lm_crt_pv cfg(key, cfg); 

break; 
case MV_CFG_KEY: 

lm_crt mv_cfg(key f cfg); 

break;" 
default: 

break; 

} 

} 

lm_crt_glbl_cfg(key f cfg) 
lm_glbljcfg key t *key; 
lm_cfg_g!bft *cfg; 

SETUP TCB; 

,m - Ch ^ 9 /^ &cfg->dffljium_mcasts, NULL, NULL, 

} 

lm_crt_vlan_cfg(key, cfg) 

lm_vlan_cfg_key t *key; 
^ ^ m _cfg_vlan"t *cfg; 

Imvlant *vlan; 
qlinkj *fink; 
lrn_mac__vlan_t *mv; 
lrn_mac_t *mac; 
SETUPJTCB; 

S cf^n"S^ anJd ' 0fg - >mtu - 8fze - cfg->num_mcasts. 

Im_chg_ylan_cfg(vlan, &cfg->dflt_mlid. &cfg->num mcasts. 
&cfg->mtu_size, &cfg->vlan_name); 
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} 



lm crt_port_cfg(key, cfg) 
7ni_port_cfg_key_t *key; 
lm_cfg_port t *cfg; 



i 



} 



lm_port t *port; 
SETUPTCB; 

port = FIND PORT(tcb->port q, &key->port addr); 
If (port = = NRJLL) { 

port = add_port(&key->port_addr); 



I m_crt_mac_cf g (key, cfg) 
lm Tnacjcfg_key_t *key; 
IrrTcfg mac t *cfg; 

{ ~ ~ " 

lm_mac t *mac; 

SETUPjTCB; 

mac = FIND_MAC(tcb->mac q, &key->mac addr); 
if (mac - = NULL) { " 

mac = add_mac(&key-> macaddr); 

} 

In^crt^vccfgfkey, cfg) 
lm_vc_cfg_key_t *key; 
lm cfg vc t *cfg; 

{ " " " 
SETUP TCB; 

} 

lm_crt pv cfg(key, cfg) 
lmjpv_cfg_key_t *key; 
lm_cfg_pv_t *cfg; 



{ 



lm_poit_vlan_t tmp; 
lm_port_t *port; 
lm_vlan_t *vfan; 
lm~port_ylanj *pv; 

SETUPJTCB; 

tmp.vlanjd = key->vlanjd; 
tmp.port~addr = key- > port addr; 
pv = FIND PV(tcb->pv q, 5tmp); 
lf(pv==KTULL){ - 
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port = FIND PORT(tcb->port q t &key->port addr); 
If (port == NULL) { 

port = add_port(&key->port_addr); 

If (vlan ■ = NULL) { 

vlan = add_vlan(key->vlanjd, tcb->dflt mtu size, 
^ tcb->"dflt_num_mcaste); " " 

pv = add_pv(&key->port_addr, key->vlanjd, cfg->mlid); 
lm_chg_pv_cfg(pv f &cfg-> mlid) ; 

lm_crt_mv_cfg(key, cfg) 

lmjmv_c f 9 keyj *key; 
lm~cfgjnvj *cfg; 



{ 



lm_mac_vlan_t *mv; 
lnri_mac_vlanj tmp; 
lm_mac_t *mac; 
lm_vlan t *vtan; 
SETUPJTCB; 

tmp. vlan Jd = key- > vlan Jd; 
tmp.mac_addr = key->mac_addr; 
mv = FIND MV(tcb->mv q, &tmp); 
If (mv = = NULL) { 

mac = FIND_MAC(tcb-> mac q, &key->mac addr); 
ff (mac = = NULL) { 

mac = addjnac(&key->mac_addr); 

if (vlan = = NULL) { 

vlan = add_vlan(key->vlanjd, tcb->dflt_mtu_size, 
tcb-> dflt_nurn_mcasts); 

mv = add_mv(&key->mac_addr, key->vten_ld, cfg->mlid); 

lm_chg_mv_cfg (mv, &cfg->mlid); 
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/* Immgmt.c 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 
V 

#lfdef CERNEL 

#include "ipc def.h" 
^include "nerdef.h* 
#lnclude < global def.h> 
#include <drlver.B> 

#undef Imjnlt 

#else /* ifndef CERNEL */ 

#Include <stdint.h> 
#include < global def.h > 
#inc!ude <ITCJf.h> 
#include <driver.h> 
#include <RTJf.h> 
#include <timer.h> 
#include <RT_def.h> 
#include <enet_lf.h> 
#include <net_def.h> 

#define ERRLOG printdbg 
#define printf printdbg 

#endif /* ifdef CERNEL */ 

#include "unipdu.h" 
#include u nnipdus.h u 
#include "altask_gl.h" 
#include "slgtask_gl.h" 
#include M svctask_gl.h" 
#indude "svcjf.h" 
#include "snmp incLh" 
#lnclude "AAL ffh" 
#include "q.h"~ 
#include d blts.h - 
#include "lm.h" 
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extern lm mac t *lm_mgmt find macO; 
extern Im~vcj^lm_mgmtji7kl_vc(); 

extern lm_port_vian_t *lm mgmt flndnext pv(); 
extern lm_mac"vlari~t *lm~mgmffindnexf mv(); 
extern InTvlanj *lnT mgmtjindriext viantf; 
extern Imjaorft *lm_mgmffindnext~portO; 
extern lm~mac"t *lm"mgmf findnexTmacO; 
extern Im_vc_t"*im_mgmt_flhdnext__vcO; 

lm_srvcjrignrit_get(insg) 
struct AgentMsg *msg; 

Int ret; 

ret = Imjdo mgmt_get(msg, FALSE); 
return (ret); 



lm_srvc_mgmt_getnext(msg) 
struct AgentMsg *msg; 

int ret; 

ret = lm_do_mgmt get(msg, TRUE); 
return (ret); 



lmjdo_mgmt_get(msg, getnext) 
struct AgentMsg *msg; 
Int getnext; 

Int ret; 
struct MB *mb; 
struct MBH *mb hdn 
struct AgentMsg *txjnsg; 

ret = RT_SUCCESS; 

tx_msg = lm_cp_mgmtjnsg(msg); 

mb = &tx_mlg- > Body; 

mb_hdr =""&mb->head; 

mb~hdr->datoff = 0; 

switch (mb_hdr->ovcode) { 

case UWGLBLOVN: 

ret = lm mgmt_get_glbl(tx_msg, getnext); 

break; 

case LM_ATTR_ENT OVN: 

ret = Inwngmt get attr_ent(tx msg. getnext); 
break; 
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case LM_PV_OVN: 

ret = lm_mgmt_get_pv(tx_msg, getnext); 
break* 

case LM'NODE_ENT_OVN: 

ret = 7m_mgmt_get_node_ent(tx_msg, getnext); 

break* **" 
case LM ' MAC_EMT_OVN: 

ret = 7m_mgrcrt_get_mac_em(tx_msg, getnext); 

break* *" ' 
case LM ' MP_ENT_OVN: 

ret = 7mjTigrrt_get_mp_errt(tx_msg 1 getnext); 

break* - « 

case LM' PM_ENT_OVN: 

ret = 7m_mgmt jjet_pm_ent(bc_msg, getnext); 

break* 
case LM Vc_ENT_OVN : 

ret = Imj^gmfget vc_ent(tx_msg, getnext); 

break; " 
default: 

ret - !RT_SUCCESS; 

mb_hdr->ercode = ER_GENERIC; 

goto err exit; 

break; 

} 

ret = lm_send_mgmt_rsp(tx msg); 
return (ret); 

err_exit: 

Tm_send_mgmt_rsp(tx_msg) ; 
return (ret); 

} 

lm_mgmt_get_glbl(msg, getnext) 
struct AgentMsg *msg; 
int getnext; 

{ 

Int ret; 
struct MB *mb; 
struct MBH *mb hdr. 
struct OS tmpjbs; 
int num_y!ans; 
Int num_ports; 
int nunrwnacs; 
int num mvs; 

int numjDvs; 
int nunrfvcs; 
SETUP TCB; ~~ 



if (CHK VB(LM_VB MSGS)) { 
printf( tt getting globals\r\n"); 
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} 

nurnvlans = QUEUE_LEN(tct»vian q); 

num ports » QUEUE LEN(tcb->port q); 

nunf macs = QUEU£"L£N(tcb->mac"q); 

nunrTmvs = QUEUE QEN(tcb->mv qj; 

nunrTpvs = QUEUE lEN(tcb->pv q); 

nunrTvcs = QUEUETEN(tcb->vc q); 

ret =TRT SUCCESS! 

mb = &msg-> Body; 

mb_hdr = &mb->head; 

tmp_osJength = sizeof(tcb->nac atm addr); 

bcopy(&tcb->nac atm addr, tmp"os.6uffer, tmp osJength); 

MB_wp OS(mb ( Q/I_NAC ADDR TlX, &tmp_os)r 

tmp_osJength = sizeof(tcE->bidT)fts); 

bcopy(tcb->bid_bits, tmp_os. buffer, tmp osJength); 

MB_wp OS(mb, LM_BID PIX, &tmp os)~ 

tmp_osTength = sizeof(tcb->mlid bits); 

bcopy(tcb->mlld bits, tmp_os.bufFer, tmp osJength); 

MB_wp_OS(mb/tM MUD BITS PIX, &tmp os); 

MB_wp_INT(mb, LAT DFLTMTLT PIX, &tcth>dflt mtu_slze); 

MB_wpJNT(mb, LM DFLT MCAST PIX, &tcb->dflt num mcasts); 

MB_wp INT(mb, LM^NUMl/LANSjPIX &num vtans); ~ 

MB_wpJNT(mb, LM_NUM MACS PIX, &num macs); 

MB_wpJNT(mb, LM_NUM~PORTS PIX, &num ports); 

MB_wp INT(mb. LMJMUMJWS PIX, &num nivs); 

MB wpJNT(mb, LM_NUM PVS PIX, &num"pvs); 

MB wp INT(mb, UtfJ\IUM~VCS~PIX, &num"vcs); 

return (ret); 

err_exlt: 
return (ret); 



lm_mgmt_get_attr_ent(msg, getnext) 
"struct AgentMsg *msg; 
Int getnext; 

{ 

int ret; 
. struct MB *mb; 
struct MBH *mb hdr; 
struct LMATTR ENTJDX *ldx; 
Imvian t *vfen; 
struct G5 tmp_os; 
struct LM_ATTR_ENTJDX tmp Idx; 
Int ~ nunwnacs; 
Int num ports; 

SETUP TCB; " 



ret = RTSUCCESS; 
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mb = &msg->Body; 
mb_hdr = &mb->head; 

idx - (struct LM ATTR ENT IDX *) mb hdr->l!d; 
vlan = lm mgmrfind vtan(ldx); 
if (vlan == NUUC) { " 
if (getnext) { 

vlan = lm mgmt find next vlan(ldx); 
If (vlan == NULL) { 
ret = IRT SUCCESS; 
mbhdr->ercode « ERJMOSUCHNAME; 
goto err exit; 

} 

} else { 

ret = IRT SUCCESS; 
mbhdr«>ercode = ER NOSUCHNAME; 
goto err exit; 

} 

} 

If (CHK_VB(LM_VB_MSGS)) { 

printf( u getting stats on vlan %d\r\n", vlan->vlanjd); 

nummacs = QUEUE LEN(vlan->mv_q); 
num_ports = QUEUETEN(vlan->pv_c|); 

lm cvt_vlan !dx(&vian->vlanjd, &tmpjdx); 
*idx = tmpjdx; 

lm c\*Jdx_ps(tmp ldx.LM VLAN, LM NUM ELEM(tmp icbtLM VLAN), &tmp os); 
MSj/vp_OS(mb, LtiyUKtfJPlX, &tmp~os); " 

tmposJength = strien(vlan->vian_name); 
bcopy(vlan->vlan name, tmp os. buffer, tmp os. length); 
MB_wp_OS(mb, LM_VLAN_NAME_PIX, &tmp_os); 

MB_wpJNT(mb, LM NUM MCAST^PIX, &vlan->num mcasts); 
MB wpJNT(mb, LM MTU "SIZE PIX, Avian- >mtu size); 
MB~wpJNT(mb, LM_MUD PIX,"&vlan->dfit mlld)r 
MB wpJNT(mb, LM~ATTR NUM PORTS PTX &num ports); 
MB~wpJNT(mb, LM_ATTR_NUM~MACS_PlX t &numjmacs); 

tmp_osJength = sizeof(vlan->mid bits); 
bcopy(vtan->mld bits, tmp os. buffer, tmp osJength); 
MB_wp_OS(mb f Od_M!D_eiTS_PIX, &tmp~os); 

return (ret); 

err_exlt: 
return (ret); 



lm_mgmt_get_pv(msg, getnext) 
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struct AgentMsg *msg; 
Int getnext; 

{ 

int ret; 
struct MB *mb; 
struct MBH *mb hdn 
struct LM PV IDX *Tdx; 
N struct LM~P\TlDX tmp Idx; 
ImjDort vfanj *pv; 
struct 0"5 ~ tmp os; 
SETUP JTCB; 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mb hdr = &mb->head; 
idx~= (struct LM_PV_IDX *) mbjidr->0d; 
pv = Imjngmt find pv(idx); 
If (pv — NULL) { ~ 
if (getnext) { 

pv = lm mgmt findnext pv(idx); 
if (pv = = NULL) { 
ret = IRTSUCCESS; 
mb_hdr->ercode = ER_NOSUCHNAME; 
goto err exit; 

} 

} else { 

ret = !RT_SUCCESS; 
mb_hdr->ercode = ERGENERIC; 
goto err exit; 

} 

} 

If (CHK_VB(LM_VB_MSQS)) { 

printf ("getting stats on pv = \r\n B ); 
print pv(pv t 0); 

} 

im_cvt_pvjdx(pv, &tmpjdx); 
*idx = tmpjdx; 

MB_wpJNT(mb, LM_PV SHELF_PIX, &tmp idx.LM PV SHELF); 

MB_wp INT(mb f LM_P\TCARD_PIX, &tmp Tdx.LM PV "CARD); 

MB wpJNT(mb. LM PV_PORT PIX, &tmpldx.LM PV PORT); 

MB~wp INT(mb, LM~PV MUDT>IX, &pv->mlid); ~ " 

lm_cvtJdx_os(tmp 0X.LM PV~VLAN, LM NUM ELEM(tmp_ldx.LM PVVLAN), 

&tmp os); ~ ~" 

MB_wp_OS(mb, LM PV VLAN PIX, &tmp os); 
return (ret); 

err_exit: 
return (ret); 



WO 94/07316 




PCT/US93/08674 



/SI 

lm mgmt.c 

lm_mgmt_get_node ent(msg, getnext) 
struct AgentMsg "*msg; 
int getnext; 

int ret; 
struct MB *mb; 
struct MBH *mb hdr; 
SETUPJTCB; 

ret = RTSUCCESS; 
mb = &msg->Body; 
mb hdr = &mb->head; 



print _tcb(tcb. 0); 
ret = IRT_SUCCESS; 
mb_hdr->ercode = ERJ3ENERIC; 
goto err_exlt; 

return (ret); 

err_exft: 

return (ret); 

} 

lm_mgmt_get_mac_ent(msg, getnext) 
struct AgentMsg *msg; 
int getnext; 

int ret; 
struct MB *mb; 
struct MBH *mbjidr; 
struct LM_MAC_ENT IDX *idx; 
struct LM_M ACCENT J DX tmpjdx; 
I m_mac_vian_t tmp_mv; 
lm_mac_addr_t mac_addr; 
lm_mac vlan_t *mv; 
struct 0>5 tmp os; 
SETUPJTCB; 

ret « RT SUCCESS; 
mb = &msg->Body; 
mb_hdr = &mb->head; 

idx = (struct LM_MAC_ENT IDX *) mb hdr->lid; 
mv = lm mgmt find rnv(id>^; 
if (mv = ~ NULQ { ~ 
if (getnext) { 

mv = Inrwngmt find next mv(ldx); 
If (mv = = NULQ { 
ret = !RT SUCCESS; 
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mbhdr->ercode * ER NOSUCHNAME; 
goto err exit; 

} 

} else { 

ret = IRT SUCCESS; 
mb_hdr->ercode = ER GENERIC; 
goto err exit; 

> 

} 

If (CHK_VB(LM_VB_MSGS)) { 
printff getting stats on mv = "); 
print_mv(mv, 0); 

lm_cvt_mv ldx(mv, &tmp Idx); 
*idx = tmjTjdx; 

lm_cvt Jdx_os(tmp JcbcLM^MAC^VLAN, LMJSlUM_ELEM (tm p Jdx. LM_M ACJ/LAN) , 
&tmp os); 

MB_wpJDS(mb, LM_MAC_VLAN_PIX, &tmp_os); 

»m_cvtJdx_os(tmp idx.LM_MAC ADDR, LM_NUM JELEM (tmp Jdx. LM_M AC_ADDR), 

&tmp_os); ~" 
MB_wp OS(mb, LM_MAC_ADDR PIX, &tmp os); 
MB_wpJNT(mb, UVJJY!ACJ/lUD_PIX, &mv->mlid); 
return (ret); 

err_exit: 
return (ret); 



lm_mgmt_get_mp_ent(msg, getnext) 
struct AgentMsg *msg; 
Int getnext; 

Int ret; 

struct MB *mb; 

struct MBH *mb hdr; 

struct LM_MP_ENT IDX *ldx; 

struct IMJAPJEmjDX tmpjdx; 

lm_mac_addM mac_addr; 

Inwnacj *mac; 

lm_port"t *port; 

InTporTaddrj portaddr, 

struct <5B tmp os; 

int shelf; " 

int slot; 

Int portjwm; 

int num vlans; 

SETUPJTCB; 

ret = RT_SUCCESS; 
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mb = &msg->Body; 
mb_hdr = &mb->head; 
idx = (struct LM_MP_ENT IDX *) mb hdr->lld; 
mac = lm mgmf find mac(idx); 
If (mac = = NULL) { " 
If (getnext) { 

mac = lm mgmt findnext mac(idx); 
If (mac = = NULCJ { 
ret = IRT_SUCCESS; 
mbhdr->ercode = ERJMOSUCHNAME; 
goto err_exit; 

} else { 

ret = IRT_SUCCESS; 
mb_hdr->ercode = ER_GENERIC; 
goto err exit; 

} 

} 

If (CHK VB(LM_VB MSGS)) { 

prlntffgetting stats on mac = %s\r\n\ 
sprint_mac_addr(&mac-> mac_addr)); 

numvlans = Q UE U E_LEN (mac- > mv_q) ; 

!m_cvt_mac_ldx(&mac~> mac_addr, &tmp Idx); 
*ldx = tmpjdx; 

lm_cvtJdx_os(tmp idx.LM MP MAC, LM_NUM_ELHM(tmpJdx.UVHVIP_MAC), 

&tmp_os); ~ 
MB_wp_OS(mb, UM_MP_MAC_PIX, &tmp_os); 

LM_CLR PORT ADDR(&port addr); 
if (mac- > port I = NULL) { " 
port = mac- > port; 

LMJNIT PORT_ADDR(&port addr, tcb->my node, 
pbrt->port_addr.aa_shelf +1, 
port->port_addr.aa_slot + 1, 
port->port_addr.aa_port + 1); 

shelf = port_addr.aa_sheif; 
slot = portjiddr.aa slot; 
portjium - port_affdr.aa_port; 

MB_wp INT(mb. LM MP SHELF PIX &sheH); 
MB_wp~INT(mb, LM"MP^CARD PIX, &slot); 
MB_wpJNT(mb, LM_MP~PORTPIX &port num); 
MB_wp INT(mb, LM MP NUM VLANS PIX &num_vlans); 
tmp_oslength = sizeof(mac->mIid bltsj; 
bcopy(mac->mlidJblts f tmp os. buffer, tmp osJength); 
MB_wp_OS(mb, LM_MP_MQD_B1TS_PIX £tmp_os); 



WO 94/07316 



PCT/US93/08674 



/L0 

lm mgmtc 

-.122- 

return (ret); 

err_exit: 
return (ret); 

} 

lm_mgmt_get vc_ent(msg, getnext) 
struct AgentMsg *msg; 
Int getnext; 

{ 

Int ret; 
struct MB *mb; 
struct MBH *mb hdr; 
struct LM_VC_ENTJDX *idx; 
struct LM VC_ENT_IDX tmpjdx; 
lm_vc_addr_t vc addr; 
lm_vc_t *vc; " 
struct OS tmp os; 
SETUP JTCB; 

ret - RTSUCCESS; 
mb = &msg-> Body; 
mbjidr = &mb->head; 
idx = (struct LM_VC_ENT IDX *) mb_hdr->iid; 
vc = Imjngmt find vc(idx); 
If (vc == NULL) { " 
if (getnext) { 

vc = lm_mgmt findnext vc(idx); 
if (vc == NULCJ { 
ret = !RT_SUCCESS; 
mb_hdr->ercode = ER_NOSUCHNAME; 
goto err exit; 

} 

} else { 

ret = !RT SUCCESS; 
mb_hdr->ercode = ERJ3ENERIC; 
goto err exit; 

} 

} 

If (CHKJ/B(LM_VB_MSGS)) { 

prlntffgetting stats on vc = %s\r\n\ 
sprint_yc_addr(&vc- > vc_addr)) ; 

lm cvt_vcjdx(&vc->vc_addr, Atmpjdx); 
*idx = tmpjdx; 

I m_cvtjdx_ps (t mp_icbc LM_VC_V LAN, LM_NUM_ELEM (tmp idx.LM VC VLAN), 

&tmp os); ~~ " 

MBj/vp_OS(mb, LM_VC_VLAN_PIX t &tmp_os); 

lm jM Jdx_os(tmp Jdx. LM^VC^MAC, LM_NUM_ELEM(tmpJdx.LM_VC_MAC) , 
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&tmp_os); 

MB_wp_OS(mb, LM_VCJ/!AC_PIX, &tmp_os); 

MB wpJNT(mb, LM_VC REF CNT PIX, &vc->ref cnt); 
MB~wp INT(mb, LM VCBIDJPIX, £vc->bid); " 
return (ret); 

err_exit: 
return (ret); 

lmjrigmt_get_pm_ent(msg, getnext) 
struct AgentMsg *msg; 
Int getnext; 



{ 



int ret; 
struct MB *mb; 
struct MBH *mb_hdn 
struct LM PM^ENTJDX *idx; 
struct LMPMENTJDX tmpjdx; 
I m_mac_ad d rjt mac addr; 
im_mac_t *mac; ~" 
lm_port_t *port; 
Im port addr_t port_addn 
struct GS tmp_os; 
int shelf; 
int slot; 
int port_num; 
Int num vtans; 

SETUPJTCB; " 

ret = RT SUCCESS; 
mb = &msg->Body; 
mb_hdr = &mb->head; 
idx"= (struct LM_PM ENT IDX *) mb_hdr->ild; 
port = lm mgmt find* port7ldx); 
if (port == NULL) { ~ 
if (getnext) { 

port = Inrwngmt findnext port(idx); 
If (port = = NULQ { 
ret = IRT SUCCESS; 
mb hdr->ercode = ER_NOSUCHNAME; 
goto err exit; 

} 

} else { 

ret = !RT_SUCCESS; 
mbJidr->ercode = ER GENERIC; 
goto err exit; 

} 

} 



■ 
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nurnvlans « QUEUE_LEN(port->pv_q); 

If (CHKVB(LM VB_MSGS)) { 

printf ("getting stats on port %s\r\n" i 

sprint j>ortjddr(&port->port_addr)); 

lm_cvt_port ldx(&port->port_addr, &tmp Idx); 

*idx - tmpTdx; 

port addr = port- > port addn 

LM "CLR_MAC ADDR(&mac addr); 

if (port- > mac V= NULL) { " 

mac = port- > mac; 

mac addr = mac- > mac addr; 
} ~ , 

shelf = port addnaa shelf + 1; 
slot = port_addr.aa slot + 1 ; 
port num = port_acFdr.aa port + 1 ; 
MB wp INT(mb, LM_PM "SHELF PIX, &shelf); 
MB_wpJNT(mb, LM_PM~CARD_PIX, &s!ot); 
MB_wpJNT(mb, LM_PM_PORT_PIX, &port num); 
MB_wpJNT(mb, LMJ>MJ\IUM_VLANS_PIX &num vlans); 
tmp_os.length = sizeof(mac_addr) - 2; 

bcopy((char *) &mac_addr + 2, tmp os.buffer, tmp osJength); 
MB_wp_OS(mb, LM_PM_MAC_PIX, £tmp_os); 
tmp_os.length = sizeof(port->mlid bits); 
bcopy(port->mlid_blts l tmp os.buffer, tmp osJength); 
MB_wp OS(mb, LM_PM_MDD BITS PIX, &tmp os); 
return (ret); 

err_exit: 

return (ret); 

lm_srvc_mgmt validate(msg) 
struct AgentMsg *msg; 



{ 



int ret; 
struct MB *mb; 
struct MBH *mb_hdr; 
struct AgentMsg *tx_msg; 

ret = RT_SUCCESS; 

txmsg = lm_cp_mgmt msg(msg); 

mb = &tx msg->Bodyr 

mb_hdr =~&mb->head; 

switch (mb_hdr->ovcode) { 

case LM_GLBL_OVN: 

ret = lmjngmt_val_glbl(tx msg); 

break; 

case LM ATTR ENT OVN: 



# * 
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ret = Im jTigmt_val_attr_em(tx_msg) ; 
break* 
case LMPVJDVN: 

ret = Tm_mgmt_val_pv(tx_msg); 
break* " "~ . **" 

case LM JslODE_ENT OVN: 

ret = Tm_mgmt_vai^node_ent(tx_msg); 

break* ~" 
case u/mAC_ENT_OVN: 

ret = Tm_mgmt_val_mac_ent(tx_m6g) ; 

break* 

case Li/ MP_ENT_OVN: 

ret = lm_mgmt_val mp_ent(tx_msg); 
break; 

case LM PM_ENT_OVN: 

ret =Tm_mgmt_val_pm_ent(tx_msg); 
break* 

case LM VC_ENT_OVN: 

ret = 7m_mgmt_val_vc_ent(tx_msg); 

break- 
default: 

ret = !RT_SUCCESS; 

mb_hdr->ercode = ER_GENERIC; 

goto err_exit; 

break; 

} 

ret = Imsend mgmt_rsp(tx msg); 
return (ret); 

err_exit: 

lm_send_mgmt_rsp(tx_msg) ; 
return (ret); 

} 

I m_mg mt_val_attr_ent (msg) 
struct AgentMsg *msg; 

{ 

Int ret; 
struct MB *mb; 
struct MBH *mb_hdr; 
struct LM_ATTR_ENTJDX *idx; 
lm_vlan_t *vlan; 
Im vlan ld_t vlan Id; 
tUlNT32" mtujslze; 
t(JINT32 num_mcasts; 
tUINT8 got_mtu_size; 
tUINT8 got num mcasts; 

SETUPJTCB; 

ret = RT SUCCESS; 



I 
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mb = &msg-> Body; 

mbjidr = &mb->head; 

mtiT size = num mcasts = -1; 

Idx = (struct LM~ATTR ENT IDX *) mb hdr->iid; 

vlan = lm mgmf find vlan(ldx); 

ff (vlan = = NULL} { " 

} else { 

got_num mcasts - MB dop(mb, LM NUM MCAST PIX); 
gotjntulize = MB_dop(mb. LM MT0_SIZE_PIX); " 
num mcasts = got num mcasts"? ~ 

MBcp INT(mb,TM IsTUM MCAST PIX, &num mcasts) : -1 ; 
mtu_sSe « got mtu size ? ~ 

MB_cpJNT(ihb, LM_MTU_SIZE_PIX, &mtu_size) : -1; 

} 

return (ret); 

err_exit: 
return (ret); 

lm_mgmt_yal_pv(msg) 
"struct AgentMsg *msg; 

int ret; 
struct MB *mb; 
struct MBH *mb hdr; 
struct LM_PV_IDX *7dx; 
lm_port vlan t *pv; 
SETUPJTCBf 

ret = RT_SUCCESS; 

mb = &msg->Body; 

mb hdr = &mb->head; 

idx~= (struct LM_PVJDX *) mb hdr->iid; 

pv = lm_mgmt_find_pv(idx); 

If (pv = = NULL) { 
} 

return (ret); 

err_exlt: 
return (ret); 

} 

lm_mgmt_vaI_node_ent(msg) 
struct AgentMsg *msg; 

Int ret; 
struct MB *mb; 
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struct MBH *mb hdr; 
SCTUP_TCB; 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mb_hdr = &mb->head; 

ret = IRT SUCCESS; 
mbJidr->ercode = ER GENERIC; 
goto err_exrt; 

return (ret); 

err_exrt: 
return (ret); 

} 

lm_mgmt_val_mac_ent(msg) 
struct AgentMsg *msg; 

{ 

int ret; 
struct MB *mb; 
struct MBH *mb_hdr; 
Im mac vlan t *mv; 
SETUPJTCBf 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mbjidr = &mb->head; 

return (ret); 

err_exit: 
return (ret); 



lm_mgmt_val_glbl(msg) 
"struct AgentMsg *msg; 

{ 

int ret; 
SETUPJTCB; 

ret = RTSUCCESS; 
return (ret); 

} 

I m_mgmt_val_mp_ent(msg) 
"struct AgentMsg *msg; 

Int ret; 



< 

i 
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struct MB *mb; 

struct MBH *mb hdn 

struct LM MP ENT IDX *Wx; 

struct UyCMP~ENT"IDX tmp idx; 

lmjTiac_addrj mac_addr;~ 

lm~mac~t *mac; " 

lm_portl *port; 

Im porTaddr t port addr; 

struct OS ~tmpj5s; 

int shelf; 

int slot; 

Int port num; 

SETUPJTCB; ~ 

ret = RT_SUCCESS; 

mb = &msg->Body; 

mb hdr = &mb->head; 

ldx"= (struct LM^MP ENTJDX *) mb_hdr->iid; 

mac = lm_mgmFfind mac (idx); 

ff (mac = = NULQ { 

} else { 

} 

return (ret); 

err_exft: 
return (ret); 



lm_mgmt_yal_pm_ent(msg) 
struct AgentMsg *msg; 

int ret; 

struct MB *mb; 

struct MBH *mb hdr; 

struct LM_PM ENT IDX *idx; 

struct LM_PM~ENTJDX tmpjdx; 

lm_mac_addr_t mac_addn 

Imjnact ~*mac; 

lm_port_t *port; 

lm_port addr t port addr; 

struct C>5 "tmp 6s; 

Int shelf; " 

Int slot; 

Int port num; 

SETUPJTCB; " 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mb_hdr = &mb->head; 
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idx - (struct LM_PM ENT IDX *) mb hdr->lld; 
port = lm_mgmt find portfldx); 
If (port - = NULQ { 
} else { 

} 

return (ret); 

err_exft: 
return (ret); 



lm_mgmt_val vc ent(msg) 
struct AgentMsg *msg; 

{ 

Int ret; 
struct MB *mb; 
struct MBH *mb hdn 
struct LM_VC_ENTJDX *idx; 
struct LMVC ENTJDX tmpjdx; 
lm vc addr_t~ vc addr; 
ImjvO *vc; 
struct OS tmp os; 
SETUPJTCB; 

ret = RT_SUCCESS; 

mb = &msg->Body; 

mb_hdr = &mb->head; 

Idx = (struct LM_VC_ENT IDX *) mb hdr->iid; 

vc = !m_mgmt find vc(idx); 

If (vc = - NUL£) { 

} else { 

} 

return (ret); 

err_exit: 
return (ret); 

} 

lm_srvc_mgmt_commit(msg) 
struct AgentMsg *msg; 

{ 

int ret; 
struct MB *mb; 
struct MBH *mb_hdr; 
struct AgentMsg *txjnsg; 

ret = RT_SUCCESS; 
tx_msg = lm_cp_mgmt_msg(msg); 
mb = &tx_msg- > Bbdy" 
mb_hdr =~&mb->head; 
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switch (mb hdr->ovcode) { 
case LM GLBL OVN: 

ret ^Tm^mgmt^cmt^glbKtx^msg); 
break* 

case LM^ATTR_ENT OVN: 

ret =Tm mgmt cmt attr ent(tx msg); 

break; 

break* 
case LM VvOVN: 

ret = lm_mgmt_cmt_pv(tx_msg) ; 

break* 

case LM^NODE ENT_OVN: 

ret = Tm_mgmt_cmt_node_ent(tx_msg); 
break* 

case LM^M AC_ENT_0 VN : 

ret = !m_mgmt_cmt_mac_ent(tx_msg) ; 

break* ~ 
case LM ' MP_ENT_OVN: 

ret = 7m_mgmt_cmt_mp_ent(tx_msg); 

break* 

case LM ' PM_ENT_OVN: 

ret = 7m_mgmt_cmt_pm_ent(tx rnsg); 
break; 

case LM VC_ENT_OVN: 

ret = 7m_mgmt_cmt_vc_ent(tx_msg) ; 

break; 
default: 

ret = !RT_SUCCESS; 

mb_hdr->ercode = ER_GENERIC; 

goto err_exit; 

break; 

} 

ret = lm_send_mgmt_rsp(tx msg); 
return (ret); 

err exit: 

Tm_send mgmt_rsp(tx msg); 
return (ret); ™* 

lm_mgmt_cmt_glbl(msg) 
struct AgentMsg *msg; 



{ 



int ret; 

int |; 

struct MB *mb; 

struct MBH *mb hdn 

struct OS tmp os; 

tUINT32 *dffljntu_size; 

tUINT32 *dflt num mcasts; 
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tATMADDR *nac addr; 
bits J *bid_bits; 
bits t *mlid_bits; 
tUIflT32 dflt mtu size a; 
UJINT32 dflrnum" mcasts a; 
tATMADDR nac a3dr_a; " 
bltsj bid b!ts"a[SIZE BID BITS]; 
bits J mlid bits a[SIZE MUD BITS]; 
SETUPJTCB; " " " 

ret = RT_SUCCESS; 
mb - &msg->Body; 
mbjidr = &mb->head; 

dflt mtu_size = dflt num mcasts = nac addr = 

Eld_bits = ml id Jilts ="NULL; 
If (MB_dop(mb, LM_NAC ADDRPIX)) { 

MB_cp_OS(mb, LMJsIAC ADDRJPIX, &tmp os); 

If (tmposJength ! = sizedf(nac addr a)) { ~ 

ret = !RT_SUCCESS; 
mb_hdr->ercode = ER_GENERIC; 
goto err exit; 

} 

bcopy(tmp_os. buffer, &nac_addr_a, sizeof(nac addr_a)); 

nac addr = &nac addr a; 
} " ~ ~ 

If (MB_dop(mb, LM BID_PIX)) { 

bzero(bid_bits_a7sizeof(bid_bits a)); 
MB_cp_OS(mb, LM_BlD_PIX, &tmp os); 
If (tmp osJength > sizeof(bid bits a)) { 

ret = !RT_SUCCESS; ~ " 

mb_hdr->ercode = ERJ3ENERIC; 

goto err exit; 

} 

bcopy(tmp os.buffer, bid bits a, tmp os length); 

bid bits = *&bid bits a; " " 
} ~ " " 

If (MB dop(mb, LM DFLTMTUPIX)) { 

MB" cpJNT(mb,TM DFLT MTU PIX, &dflt mtu size a); 

dflt mtu size = &dfft mtu "size a; 

} " ~ " " " ' 

If (MB dop(mb, LM DFLT_MCAST PIX)) { 

Md^cpJNTfmb.TM DFLT_MC*ST PIX, &dflt num mcasts a); 

dflt num mcasts = "&dflt num mcasts a; 
} - - - - 

If (MB dop(mb, LM_MUD_BITS PIX)) { 
bzero(mlid bits_a, sizeof(mlid bits a)); 
MB_cp OS"(mb, LM_MUD BITS PTX, &tmp_os); 
If (tmp_os.length > sizeoffmlid Bits a)) { 

ret = !RT_SUCCESS; ~ ~ 

mb_hdr->ercode = ER_GENERIC; 
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goto err exit; 

} 

bcopy(tmp_os.buffer, mlid_bits a, tmp osJength); 
mlid bits - &mlid bits a; 
} ~ ~ 

lm chg glbl cfg(dfit mtu size, dflt num mcasts, nac addr, bid bits, 

mild fifes); ^ " 

return (retf; 

err_exit: 

return (ret); 



lm_mgmt_cmt_attr ent(msg) 
struct AgentMsg"*msg; 



Int ret; 
Int tmp_ret; 
Int a_r; 
struct MB *mb; 
struct MBH *mbhdr; 
struct LM_ATTR_ENT IDX *idx; 
qlinkj *llnk; 
lm_mac_t *mac; 
lm_mac_yian_t *mv; 
Imvlanj *vlan; 
lm_vlanjdj vlan id; 
tUINT32 *mtu~size; 
tUINT32 *num mcasts; 
tUINT32 *dfit_mlid; 
char *vlan_name; 
tUINT32 mtu_size_a; 
tUINT32 num mcasts a; 
tUINT32 dfltjrhlid a; 

char v!an_name_a[LM_MAX_VLAN NAME]; 

int vlan_name len; • 

struct OS tmp_os;~ 
Int chngd; 



SETUPJTCB; 

ret - RT_SUCCESS; 
chngd = FALSE; 
mb = &msg->Body; 
mbjidr = &mb->head; 

a_r = MB_cmpJx(mb, LM^VLAN^PIX, LM_VLANJXO, LM^VLANJXL); 
dflt_mlid num_mcasts = mtu_size « vlanjiame = NULL; 
num mcasts a = tcb->dflt num mcasts; 
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mtu size a = tcb->dftt mtu size; 
dflt_mlid_a = LMJAAXlAUGi 
tmp_os.length «= 3; 

bcopyCbob", tmp os.buffer, tmp os.length); 
If (MB dop(mb v LM MUD PIX)) ? 

MB cpJNT(mb, LM MDD PIX, &dflt mild a); 

dfltlnlid - &dflt mlid a; 

} " " " 

If (MB_dop(mb, LM NUM MCAST_PIX)) { 

M B_cpJNT(mb, XM_fJOM_MCAST_PIX &num_mcasts_a); 

num m casts » &num mcasts a; 

} " 

If (MB dop(mb, LM MTU_SIZE PIX)) { 

M B_cp_l NT(mb,T-M_MTU_STZE_PIX, &mtu_slze_a); 

mtu* size = &mtu size a; 

} " " 

If (MB_dop(mb, LM VLAN NAME_PIX)) { 

MB_cp_OS(mb, LMVLAN NAME_PIX, &tmp_os); 

If (tmp_os.length > sizeof(vlan_na"me_a) - 1) { 

tmp os.length = sizeof (vlan nameT a) - 1 ; 

} 

vlan name = &vlan name a; 
} " 

bcopy(tmp_os.buffer, vlan_name_a, tmp_os.length); 
vlan_name_a[tmp_os.length] = 0; 

idx = (struct LM_A7TR_ENT IDX *) mb_hdr->iid; 

vlan = lm mgmt find vian(idx); 

If (vlan = = NULL && a_r == MB IXP CREATE) { 

lm_cvtJdx_vlan(ldx->LM_VLAR f Avlanjd); 

vlan = addvlanfvlanjd, mtu_size_a, nummcastsa, 
vlan name a); 
} else If (vlaril « NULL && a_r = = MB_1XP_DELETE) { 

vlanjd = vlan- > vlan Id; 

free_vlan(vlan); 

vlan = NULL; 

} 

If (vlan 1= NULL) { 

lm_chg vlan^cfgfvlan, dfltjnlid, nunrwncasts, mtu^slze, 
vfan name); 

} 

If (vlan 1= NULL) { 

print_vlan(v!an, 0); 
} else 

printf (tried to add vlan %d f a_r = %d\r\n" f vlanjd, a_r); 
return (ret); 

err_exit: 
return (ret); 

} 
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lmjTigmt_crnt pv(msg) 
"struct AgeritMsg *msg; 

Int ret; 
int an 
struct MB "*mb; 
struct MBH *mb hdr; 
struct LM PV IDX *idx; 
ImjjortjT "*port; 
lm_vlan_t *vlan; 
lm~porfaddr t port addr; 
lm_ylan id t ~ vlan Id; 
tUINT32~ ~ *mlidr 
tU!NT32 mlid a; 
Im port vlan t *pv~ 
SETUPjrCBf 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mbjidr = &mb->head; 
mliff - NULL; 

a_r « MB_cmpJx(mb, LM PV VLAN PIX, LM PV VLAN IXO, LM PV VLAN IXL); 
idx = (struct LM_PVJDX *7 mB hdr-> lid; ~ " ~" " " " 

pv = lm_mgmt_findj>v(idx); 
if (p V == NULL && a r == MBJXP CREATE) { 

lm_cvt idx port(&idx->LM PV_SfiELF, &port addr); 

lm_cvtldx"vlan(&ldx->LM"*PV VLAN, &vlan Id); 

port =~FlND PORT(tcb->pbrTq, &port_addr); 

vtan = FIND~VLAN(tcb->vlan q. vlan id); 

if (port = = NULL) { " 

port = add_port(&port_addr); 

if (vlan == NULL) { 

vlan = add^anfvlanjd, tcb->dflt mtu_size, 
^ tcb->dfltjiumjmcasts); ~ 

pv = add pv(&port addr, vlan id, vlan->dfit miid); 
if (pv = = NULL) { ~ 

ret = !RT_SUCCESS; 

mbJidr->ercode = ER GENERIC; 

goto err exit; 

} 

} else If (pv I = NULL && a_r = = MBJXP DELETE) { 
free_pv(pv); 
pv = NULL; 

} 

if (pv != NULL) { 

ff (MB dop(mb, LM PVMUD PIX)) { 

MB cpJNT(mb,"LM PV MUD PIX, &mlid a); 
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mlid = &mlid a; 

} 

} else { 

ret = !RT_SUCCESS; 
mb_hdr->ercode = ER_GENERIC; 
goto err exit; 

} 

tf (pv!= NULL) { 

lm chg pv cfg(pv, mild); 

} " " " 
return (ret); 

err_exlt: 
return (ret); 

} 

I m_m g mt_cmt_nod e_ent (msg) 
struct AgentMsg *msg; 

{ 

int ret; 
struct MB *mb; 
struct MBH *mb hdr; 
SETUPJTCB; 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mbjidr = &mb->head; 

ret = !RT_SUCCESS; 
mb_hdr->ercode « ER_GENERIC; 
goto err_exlt; 

return (ret); 

err_exit: 

return (ret); 

} 

lm_mgmt_cmt_mac_ent(msg) 
"struct Agent Msg"*msg; 

Int ret; 

int a r; /* add/remove flag */ 

struct LM_MAC_ENT IDX tmp Idx; 
struct MB *mb; " 
struct MBH *mb_hdr; 
struct LM_MAC_ENTJDX *idx; 
lm mac addr_f" mac addn 
InTvlanJd t vlan Id! 
tUfNT32 *mlidr 
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tUINT32 mlid a; 
lm_mac_vlan_t *mv; 
lm_mac_t ~ *mac; 
lm_port t *port; 
lm vlarft *vlan; 
seTUPTCB; 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mbjidr = &mb->head; 
mac - NULL; 
mlid = NULL; 

Idx = (struct LM_MAC_ENT IDX *) mb hdr->Iid; 

a J" = MB_cmpJx(mb f LM^MAC^VLAN^PIX, LM_MAC_VLANJXO, LM_MAC_VLAN IXL); 

mv = lm_mgmt_f ind_mv(idx) ; 

If (mv m = NULL && a r = = MBJXP CREATE) { 

lm cvtjdx mac(&ldx->LM MAC_ADDR t &mac_addr); 

lm_cvt ldx_vf an (&f dx- > LM_M AC_VLAN, &vlanjd); 

mac = FINDJV!AC(tcb->mac_q, &mac addr); 

vian « FIND VLAN(tcb->vlan q, vlan 0); 

if (mac » flULL) { 

mac = add_mac(&mac_addr); 

If (vlan = = NULL) { 

vlan = add_vlan(vlanjd t tcb->dflt_mtu size, 
tcb->dflt_num_mcasts); 

mv = add_mv(&mac addr, vlanjd, LM MAX MID, vlan->dflt mlid); 
} else if (mv ! = NULL && a r = = MB IXP" DELETE) { 
mac = mv->mac; 
free_mv(mv); 
mv = NULL; 

If (mv! = NULL) { 
mac = mv->mac; 

If (MB dop(mb, LM MAC MUD PIX)) { 
If (mac == NULL) { " - 
ret = !RT_SUCCESS; 
mb_hdr->ercode = ERJ3ENERIC; 
goto err exit; 

} 

MB_cp INT(mb ( LM MAC MUD PIX. &mlW a): 
mlid = "Smnlid a; 

} 

y else ■{ 

ret = IRT SUCCESS; 
mb_hdr->ercode = ER GENERIC; 
goto err exit; 

} 
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If (mv != NULL) { 

lm chg mv cfg(mv. mlid); 

} ~ " " 
return (ret); 

err_exlt: 
Teturn (ret); 

} 

lm_mgmt_cmt_vc_ent(msg) 
"struct AgentMsg *msg; 

{ 

int ret; 
struct MB *mb; 
struct MBH *mb_hdr; 
struct LM VC ENT IDX *idx; 
struct LM_VC_ENTJDX tmpjdx; 
lm_vc_addr_t~ vc addr; 
lm vc t *vc; ~ 
InTbidJ *bid; 
tUINT32 *ref_cnt; 
lm bid_t bid a; 
tUfNT32 ref_cnt_a; 
struct OS tmp os; 
SETUPJTCB; 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mb_hdr = &mb->head; 
bid = recent = NULL; 

idx = (struct LM_VC_ENT IDX *) mbhdr->iid; 
vc = lm_mgmt find vc(ldx); 
If (vc = - NULL) { 

ret - IRTSUCCESS; 

mb_hdr->ercode = ER_GENERIC; 

goto err exit; 

} 

lm_cvt_vcjdx(&vc->vc_addr, &tmpjdx); 
*idx = tmp idx; 

lm_cvtJdxJbs(tmpJdx.LM_VC VLAN, LM NUM ELEM (tmpjdx. LM VC VLAN), 
&tmp_os); 

If (MB_dop(mb. LM VC REF CNT PIX)) { 

MB_cpJNT(mb, LM_VC fiEF CNT_PIX, &ref cnt a); 
ref cnt = &ref cnt a; 

} ~ " " ■ 

If (MB_dop(mb, LM VC BID PIX)) { 

MB_cp INT(mb, LM"VC BID PIX, &bld a); 

bid = ffbid a; 

} 

lm_chg_vc_cfg(vc, bid, ref_cnt); 
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return (ret); 

err_exlt: 
return (ret); 

} 

!m_mgmt_cmt pm_ent(msg) 
"struct AgentMsg *msg; 

Int ret; 

struct MB *mb; 

struct MBH *mb hdr; 

struct LM PM ENTlDX *idx; 

struct UOM~ENTJDX tmpjdx; 

lm_mac_addr_t mac_addr_a; 

Inwnac addr_t *mac addn 

bits t " *mlid_bfts; 

bits J mlid_bits_a[SlZE MUD BITS]; 

lm_port_t *port; 

lm_port addr_t port_addr; 

struct dS tmp os; 

SETUPJTCB; 

ret « RT_SUCCESS; 

mb = &msg->Body; 

mbjhdr = &mb->head; 

macaddr = mlid_bits = NULL; 

Idx = (struct LM_PM ENT IDX *) mb hdr->iid; 

port = lm mgmt find" portfldx); 

If (port = = NULL} { " 

ret = !RT_SUCCESS; 

mb_hdr->ercode = ERJ3ENERIC; 

goto err exit; 

} 

If (MB dop(mb, UWJ>MJMAOPIX)) { 

LM_CLR MACADDR(&mac addr a); 

MB cp 0S(mb, LM_PM MAC_Pl£ &tmp_os); 

bcopy(tmp_os.buffer. (cRar *)"&mac addr_a + 2, tmp os.length); 

mac addr = &mac addr a; 
} ~ " 

If (MB_dop(mb, LM PM MUD BITS PIX)) { 

MB_cp OS(mb f IM PM MDD BITS PIX, &tmp os); 

bcdpy(tmp os.buffeT, mlTd_blts~a f tmp os.lengtfi); 

mlidjbfts ="~&mlid_bits_a; 

If (port != NULL) { 

I m_chg _port_cf g (po rt, macaddr, mlldjrits); 

return (ret); 
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I m_mg mt_cmt_mp ent(msg) 
struct AgeritMscf*msg; 

Int ret; 

Int a_r; /* add/remove flag */ 

struct MB *mb; 

struct MBH *mb hdr; 

struct LM MP^ENTlDX *Idx; 

struct LM~M PENT J DX tmp_idx; 

lm_mac_addr_t nriic_addr; 

lm__mac_t *mac; 

lm_port_t *port; 

bitsj *mlid bits; 

bits J mlid ~bits_a[SIZE_MUD_BITS] ; 

Im port addr t port_addr; 

struct C55 ~tmp_os; 

int shelf; 

Int slot; 

int port num; 

SETUPJTCB; " 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mbhdr = &mb->head; 
mlid^bits = NULL; 

idx = (struct LM MP ENT IDX *) mb_hdr->iid; 

a_r - MB_cmp Bc(mB f LM_MP MAC_PIX, LM MP_MAC_IXO, LM_MP_MACJXL); 
mac = I m_mgmt_flnd_macT(idxy; 
If (mac = = NULL && a_r = = MBJXP CREATE) { 
I m_cvtjdx_mac (&idx- > LM MP MAC, &mac_addr); 
mac * addjnac(&mac ad9r); " 
if (mac = = NULL) { ~ 
ret - !RT_SUCCESS; 
mb_hdr->ercode = ER_GENERIC; 
goto err exit; 

} 

} 

if (mac ! = NULL && a_r == MBJXPDELETE) { 
free mac(mac); 
mac" = NULL; 

} 

if (mac ! = NULL) { 

if (MB dop(mb, LM_MP MUD BITS PIX)) { 

MB~cp OS(mb, LM_KHP MDD_BITS_PIX, &tmp os); 
bcopy(tmp os.buffer, mfid bits a, tmp os.length); 
mlid bits =~&mlid bits a; " 
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} 

If (mac I = NULL) { 

Im chg mac cfg(mac, m!id bits); 

} " " " 
return (ret); 

err_exft: 
return (ret); 

> 

struct AgentMsg * 
lm_cp_mgmt_msg(msg) 
struct AgentMsg *msg; 

{ 

struct AgentMsg *ret; 
Int msgjen; 

msgjen = msg->Hdr.Length + ITSZ; 
ret e (struct AgentMsg *) ReqMsgMem2ero(msg len); 
if (ret - = NULL) 
goto err_exit; 

bcopy(msg, ret msgjen); 
return (ret); 

err exit: 
7Srash(993, 0, 0); 

} 

lm_vc_t * 
Im mgmt find vcfldx) 
struct LM_PVJDX *idx; 

lm_vc_addr_t tmp_vc; 
lm_vtan_t *vlan; 
lm_vc t *ret; 
SETUP_TCB; 

ret = NULL; 

lm_cvtjdx_vc(idx, &tmp_vc); 

vlan - FIND VLAN(tcb->vlan q, tmp vcvlan id); 

If (vlan ! = NOLL) { " 

ret = FIND^VCfvlan^vcji, &tmp_vc); 

return (ret); 



lm_porM/lan_t * 
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lm mgmt flnd_pv(idx) 
"struct EM PV IDX *idx; 

{ " " 

lm_port_vian t tmp pv; 

Im port vlan~t *ret;~ 

s^rupjrcBr 

lm_cvt idx pv(idx, &tmp_pv); 

ret = FiND~PV(tcb->pv_q, &tmp pv); 

return (ret)f 



lm_mac_vlan_t * 
lirTmgmt find_mv(idx) 

struct EM MAC ENT IDX *idx; 

{ " " 

Im_mac_vlanj: *ret; 
lm_mac_vlan~t tmp_mv; 
lm_mac_vtan t *mv; 
SETUPJTCBf 

lm_c\rtjdx_mv(idx, &tmp mv); 

ret = RND_MV(tcb->mvjq, &tmp mv); 

return (ret); 



lm_mac_t * 

Im mgmt findmacfldx) 

"struct EM MP ENT IDX *idx; 

{ ~ " ~ 

lm_mac_t *ret; 

Immac addr t mac addr; 
SETUP_TCB;~ 

lm_cvt_idx_mac(idx-> LM_MP_MAC, &mac addr); 
ret = FIND MAC(tcb->mac_q, &mac_addrT; 
return (ret); 



lm_port_t * 
lm~mgmt_find_port(idx) 

"struct LM PM ENT IDX *idx; 
{ " " - 

ImportJ *ret; 

lm_port_addr t port addr; 

SETUP^TCB" 

lm_cvt idx port(&idx->LM_PM SHELF, &port_addr); 
ret = FIND_PORT(tcb->port q7&port_addr); 
return (ret); 
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lm vlanjt * 

Irrfmgmt find vlan(idx) 

"struct tM AtTR ENT IDX *ldx; 

{ " " " 

lm_vlan_t *ret; 

Im vlan id t vlan id; 
inr I; 
SETUP_TCB; 

Im cvt ldx_vlan(idx->LM VLAN, Avian Id); 
ret = PlND_VLAN(tcb->vTan q, vlan idf; 
return (ret); ~ " 



lm_vc_t * 
lm_mgmt_findnext_vc(idx) 
struct LM VC ENT IDX *idx; 

{ ~ " " 

lm_vc_addr_t tmp_vc; 
ImTvcj Vet; 
lrn_vlan t *vlan; 
SETUP TCB; 

ret = NULL; 

lm_cvt_idx vc(idx, &tmp_vc); 

vlan = FlMD VLAN(tcb->vlan q, tmp vavlan Id); 

if (vlan != NOLL) { 

ret « FINDNEXTJ/C(vlan->vc_q f &tmp_vc); 

if (ret = = NULL) { 

vlan = FINDNEXT VLAN (tcb-> vlan q, tmp vavlan id); 
if (vlan I- NULL) f 

ret - RNDNEXT_VC(vlan->vc_q, &tmp_vc); 

} 

return (ret); 

lm_port_vtan t * 
Im"mgmt_fin3next_pv(idx) 

struct EM PV IDX *idx; 
{ " " 

lm_port_vlanj tmp pv; 

Im porfTviarft *ret;~ 

setUPTCBf 

lm_cvtjdx_pv(idx, &tmp pv); 

ret = FINDNEXTJ*V(tcb">pv_q, &tmp_pv); 
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return (ret); 

} 

lm mac vlan t * 
IrrTmgmt findnext mv(kjx) 
"struct DMIAC~ENTJDX *idx; 

lm_mac_ylan_t *ret; 
lm~mac_vlan~t tmp mv; 
Im^macfaddrJ mac_addr; 
lm_jnac"vlan t *mv; 
SETUP JTCBf 

lm_cvtjdx_mv(idx, &tmp mv); 

ret = FINDNEXT MV(tcb~>mv_q, &tmp_mv); 

return (ret); 



lm_mac_t * 

I m^mgmM Ind nextmac (idx) 

struct LM MP ENT IDX *ldx; 
{ - " - . 

lm_mac_t *ret; 
Immac addr t mac addr; 
SETUP_TCB; " 

lm_cvtJdx_mac(idx-> LM MP_MAC, &macaddr); 
ret = FINDNEXT MAC(tcB->mac_q. &mac addr); 
return (ret); 



lm_port_t * 
lm_mgmtJindnext_port(idx) 
struct LM PM ENT IDX *ldx; 

{ " - ~ 

lm_port t *ret; 
lm porTaddr t port addr; 
SETUPjTCBr 

lm_cvt ldx_port(&Idx->LM PM_SHELF, &port_addr); 
ret = FlNDNEXT_PORT(tc5 : ->port q, &port addr); 
return (ret); 



lm_vlan_t * 
lm_mgmtfindnext_vlan(idx) 

struct LM ATTR ENT IDX *ldx; 

{ " " ~ 

lm_vfan_t *ret; 
lm vfan id t vlan id; 
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Int I; 
SETUPJTCB; 



lm cvt Idx vtan(idx-> LM_VLAN, &vtan Id); 
ref « FINDTJEXT VLAN(tcb->vlan q, vlan W); 
return (ret); 

} 

lm_cvt_mvjdx(mv, Idx) 

lm macTvlan t *mv; 

struct Utl MAC ENT IDX *ldx; 

{ " " " 

bzerofldx, slzeof(*idx)); 

lm_cvt macjdx(&mv->mac_addr l Idx- > LM_MAC_ADDR) ; 
lm cvTvl an Jdx(&m v- > vlan Id, ldx-> LM_MAC_VLAN) ; 



I m_cvt_pvjdx(pv, Idx) 
Im port vlan t *pv; 
struct LM PV IDX *ldx; 

{ " 

bzerotfdx, sizeof(*idx)); 

idx->LM PV SHELF = pv->port_addr.aa_shelf + 1; 
Idx- > LM_P\TCARD « pv->port_addr.aa_slot + 1; 
ldx->LM_PV PORT = pv->port addr.aa_port + 1; 
lm_cvt_yian Jdx(&pv- > vlan id, idx->LM PV VLAN); 



lm_cvt_portJdx(port_addr, Idx) 
lm_port addr t *port addr; 
struct LRl^PKT ENTJDX *idx; 

bzeropdx, sizeof(*Idx)); 

Idx- > LM_PM_SHELF = port_addr->aa_shelf + 1; 
idx->LM PM CARD = port_addr->aa slot + 1; 
Idx- > LM~PM PORT = port addr->aa"port + 1; 



lm_cvt_vcjdx(vc addr, Idx) 

lm_yc_addr t~*vc addr; 

struct LM VC ENTlDX *ldx; 
{ - - - 

bzero(idx, slzeof(*ldx)); 

lm_cvt_mac_ldx(&vc addr->mac addr, idx->LM VC MAC); 
lm cvt_vlan_ldx(&vcliddr->vlanld, ldx->LMJKTVLAN); 



lm cvt_mac ldx(mac, idx) 
7m_mac_addr_t *mac; 
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struct LM MP ENT IDX *idx; 

{ " " " 

Int i; 

bzerofldx, sizeof(*idx)); 

for 0 = ATM_FIRST MAC; i < s!zeof(lm mac addr t); I++) { 
fdx->LM_MP_M>rC[l - ATM_FIRST_MAC] = mac>>aa_byte[l]; 

} 

lm_cvt_vlanjdx(vlan Id, Idx) 
lm_vlan Id t *vlan id; 
struct LRl ATTR ENfT IDX *idx; 

bzerofldx, slzeof(*ldx)); 

idx-> LM_VLAN[LM_VLANJXL - 1] = *vtan Jd; 



/**/ 

ImjMJdx^mvfldx, mv) 

struct LM_MAC_EIMTJDX *ldx; 
Inrwnac vtan t ~*mvr 

{ " " 

lm cvt idx_mac(idx-> LM_MAC_ADDR, &mv->mac_addr); 
lm_c\njdx~\^an(idx-> LM_MAC_VLAN f &mv->vlanjd); 

lm_cvtjdx_pv(idx, pv) 

struct LM_PVJDX *idx; 

lm_port vlan t *pv; 
{ " 

Im cvt idx_port(&ldx->LM_PV_SHELF, &pv->port addr); 
lm_cvtJdx_v1an(idx-> LM PV_VLAN, &pv->vlan IdJ; 



lm cvtjdx_vc(idx, vc addr) 
"struct LM^VC^EfsTT IDX *ldx; 
lm vc addr t *vc addr; 

{ " " " 

lm_cvt_idx_mac(idx- > LM VC MAC, &vc addr->mac addr); 
lm_cvt_idx_vian(idx-> LMJVC^VLAN, &vcT addr- > vlan Jd); 



lm_cvtjdx_port(idx, port) 

struct LM PM_ENTJDX *ldx; 
lm port addr t *port; 

{ " " ~ 
SETUP JTCB; 



# 
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LM INIT_PORT ADDR(port, tcb->my node, ldx->LM PM SHELF- 
ldx->LM" PM CARD - 1, Wx->lM PM PORT " 
} " " ~ " 



Im_cvtjdx_mac(idx, mac) 
struct LM_MP ENTJDX *toq 
lm mac addrl *mac; 

{ " " " 
Int I; 

LM CLR MAC_ADDR(mac); 

iorji « ATM FIRST MAC; i < slzeof(lm mac addr t); { 
mac->aaT>yte[ir= ldx->LM_MP_MAC[l - ATMjFlRST_MAC]; 

} } 

lm_cvtjdx_vlan(idx, vlanjd) 
struct LM_ATTR_ENT 1DX *idx; 
lm vlan id t *vian i3; 

{ ~ " " 

* vlanjd = idx-> LM_VLAN [LM_VLAN JXL - 1]; 



I mcvt Jdx_os (idx, len, os) 
u_short *idx; 
Int len; 
struct OS *os; 

{ 

Int i; 

os- > length = len; 
for (i = 0; i < len; { 
' os->buffer[i] = idx[l]; 

} } 
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/* lm util.c 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

* Description: 

* < Description of the general category of file contents > 

* Routines: 

* <An OPTIONAL list summarizing the routines in this file> 



#ifdef CERNEL 

#include *ipc def.h" 
#include "net~def.h" 
#include <global_def.h> 
#include <driver.h> 

#undef Imjnit 

#else /* ifndef CERNEL */ 

#include <stdint.h> 
#lnclude <!TC if.h> 
#lnclude <RTlf.h> 
#include <glo&al_def.h> 
#include <driver.h> 
#include <timer.h> 
#lnclude <RT_def.h> 
#include <enetjf.h> 
#include <net_def.h> 
#include <NAC_shared_def.h> 

#define ERRLOG printdbg 
#define printf printdbg 

#endif /* ifdef CERNEL */ 

#lndude 'unipdu.h' 
#Include "nnlpdus.h" 
#include "altask gl.h" 
#include "sigtask_gl.h' 
#lnclude "svctask gl.h" 
#lnclude "svcJf.fT 
#lnclude "snmp incl.h" 
#lnclude "AALJf.h" 
#lnclude \vdb if.h" 
#lnclude "q.h""" 
#lnc!ude "bits.h" 
#include ■lm.h" 
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static char hex_dig[] = "0123456789abcdef; 
lm_es cfg_respjt * 

Im^bulld_es_cfg^resp(mac. enq, resp len) 
lm nriac_T ~ *mac; 
tCFGELEM *enq; 
Int *respjen; 



{ 



lm_es_cfg_resp_t *ret; 
Int ret Jen; 
int nurn_paddrs; 
tPORT_CFGELEM *paddr; 
qlinkj *link; 
lm_mac_ylan_t *mv; 
lm_port_t *port; 
struct atm addr port addr; 
int "I; 
int miid; 

SETUPJTCB; 

ret = NULL; 
retjen = 0; 

if (CHK_VB(LM_VB MSGS)) { 

prlntf( u Send!ng escfg resp msg to mac %s\r\n\ 
sprint_mac_addrflSimac- > mac_addr)) ; 

port = mac- > port; 
numpaddrs = -t; 
if (port !- NULL){ 

for (link = HEAD_Q (mac- > mv_q) ; link != NULL; link = link->next) { 

mv = (lm_mac vlanj *) link- > data; 

mlid = mv->mfid; 

printf("num_paddrs = %d, mlid » %d\r\n tt , num_paddrs, mlid); 
numjaaddrs « (num paddrs < = mlid) ? mlid : num_paddrs; 

} } 

num_paddrs+ + ; 

ret len = SIZE LM ES CFG RESP + 

Inurnjjaddrs - i) * sizeof5PORT_CFGELEM) ; 

ret = (l™_es cfg respj *) 

ReqMsgMem2ero(ret len); 
If (ret = - NULL) 

goto err_exit; 

bzero(ret, ret len); 

BUILD JJNIfiDRm(&ret->lmi hdr, NNI PROTOCOL, NN PDU STATUS RESP 
LMf STATUS CONFIG, LMI GLOBAL CREF TYPE * uo - ncor ' 
LMIJ3LOBAL _CREF_VALU£); 
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ret->enq = *enq; 

port addr = port->port_addr; 

padffr = ret->paddr; 

for (i «= 0; I < num paddrs; I++) { 
paddr[i].af type~= LMI_PORT ADDR; 
paddr[i].arport = port_addr; ~ 
paddr[l].af_port.aaJannum I; 

link = HEAD Q(mac->mv_q); 

for (link = HEADJ3(mac->mv_q); link != NULL; link - link->next) { 
mv = (lm_mac vlant *) link- > data; 
mlid = mv->mITd; 

paddr[mlid].af type = LMI P0RT_ADDR; 
paddr[mlid].af mid = mv->mid; 
if (mv->vlan =~= NULL) { 

paddr[mlid).afjncasts = 0; 

paddrfmiidj.af mtu = 0; 
} else { 

paddr[mlid].af_mcasts = mv->vlan->num_mcasts; 
paddr[mlid].af_mtu = mv->vlan->mtu_si2e; 

paddr[mlid].af_port = port_addr; 
paddr[mlid].af_port.aaJannum = mv->mlid; 

*respjen = retjen; 
return (ret); 

err_exit: 

*respjen = 0; 
return (ret); 

lm_send_mgmt_rsp(msg) 
struct AgentMsg *msg; 

int ret; 
SETUP JTCB; 

if (CHK_VB(LMVB MSGS)) { 
printf ("sending a~mgmt rsp\r\n"); 

ret = SendProxyMsg(msg, msg->Body.head.mbsize, 

SNMPA_MGMT GETRESP); 
return (ret); ~" 

lm send svc rel req(lmi hdr, cause) 
tLMIhfDR " -*| m i hdr; 
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tUINT32 cause; 

{ 

Int ret; 
staict svclf *msg; 
tUINT32 msg len; 
tREL_REQ *refreq; 
tUINT8 *rel cause; 
tLMIHDR *tx Imi hdr; 
tITC HEADER *Ttc; " 
SETDPJTCB; 

If (CHK_VB (LM_VB_MSGS)) { 

printf("sending a sve re! req msg, cause is %d\r\n", 
cause); 

} 

ret = RT SUCCESS* 

msg J en ~= SVCIFPDUJDFFSET + slzeof(*rel req); 
msg = (struct sveff *) ReqMsgMemZero(msg (en); 
if (msg = = NULL) { 

ret - !RT_SUCCESS; 

goto err exit; 

} 

relreq = (tREL_REQ *) & msg- > Imi hdr; 

tx Imi hdr = &rel req->lmi hdr; 

*tx Imijidr = *lml_hdr; " 

tx imijidr->lh pdujype = SDU_RELEASE_REQ; 

rel^cause = (t0lNT8 *) & rel_req->lmi cause; 

LMI_ADD_ELEMENT(rel cause, LMI RELEASE_CAUSE, cause); 

ret = lm_send_svc msgfrnsg, msg Ten); 

return (ret); 

err_exit: 
Teturn (ret); 

} 

lm_send__svc msg(itc t len) 
tITC HEADER *itc; 
tUIISiT32 ien; 

{ 

Int ret; 
SETUP_TCB; 

if (CHK_VB(LM_VB_MSGS)) { 
printf ("sending a sve msg\r\n"); 

BUILD JTCH((*itc), ien - IASZ, TID SVC, 0. EX REQUEST, 

TA AALJND RECEIVE, tcb->mytid); " 
ret = SendMsg(ltc7; 
return (ret); 



» 
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lm_send_alan_cfg(prefix, atm_hdr, slot_num, active ports, num_paddrs, paddrs) 
lm_prefix_t prefix; 
Im atm_fidr t atm hdn 
tUlNTB slot num; 
tUINT32 active ports; 
tUIMT32 num paddrs; 
tATMADDR *paddrs; 

{ 

lm_alan_cfg_resp t *resp; 
int ret; 
Int resp len; 

int i; " 

SETUPJTCB; 

If (CHK VB(LM_VB MSGS)) { 

printffsend an a!an_cfg msg, prefix = 0x%x, atmjidr = 0x%x\r\n", prefix, atm hdr); 
printf("\ts1ot_num = %d, act_ports = %d, num_paddrs = %d\r\n", 
slot_num, active_portsrhum_paddrs); 

respjen = SIZE_LM_ALAN_CFG_RESP + (numpaddrs - 1) * sizeof (tATMADDR); 

resp = (lm_alan C fg resp t *) ReqMsgMemZero(resp len, 0); 
If (resp = = NULL) {" ~ 

ret = !RT_SUCCESS; 

goto err exit; 

} 

/* Fill in the NNSTATUS RESP fields */ 

BU!UD_UNIJHDRm(&resp->lml hdr, NNI PROTOCOL, NN PDU STATUS RESP, 
LMI_STATUS CONFIG7LMI GLOBAL CREF TYPE; 
LMI GLOBAL" CREF_VALUE) ; 

/* Fill in the ALANCFG_ENQ fields */ 

resp->enq.elemjype = ALAN_CFG_ENQ; 
resp->enq.slotid = slot_num; 

/* Fill In the ALANCFG_RESP fields */ 

resp->resp.elem_type - ALAN_CFG RESP; 
resp- > resp.active_ports = active ports; 
resp- > resp. nac id « tcb->nac Id; 

ATM_ADDR_C<5PY(resp->resp7iac addr, tcb->nac_atm addr); 
resp- > resp. num_paddr = num_paddrs; 
for (i = 0; i < num paddrs; I++) 

ATM_ADDR JX5PY(resp-> resp.paddrsfl], paddrs[i]); 

ret = AAL_DataSendNR(&tcb->my aal key, resp, resp len, 

*((tUINT32 *) & prefix), *((tUINT32* s ) & atm hdr)); ~ 
return (ret); 
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err exit: 
Tf (resp ! = NULL) 

FreeMem(resp); 
return (ret); 

} 

lm_send_es_cfg_lnd(mac) 
lm mac t ~ *mac; 

{ " " 
Int ret; 
lm_port_t *port; 
InTprefbct prefix; 
Imatmhdr t atm hdr; 
tCFGELEM " enqT 
lm_es_cfg_resp t *resp; 
lnt~ " resp len; 
tUINT32 tx~shelf; 
tUINT32 tx slot; 
tUINT32 tx~port; 
tUINT32 tx vci; 
SETUPJTCB; ~ 

if (CHK_VB(LM_VB_MSGS)) { 

printf( M sending es_cfg ind to mac %s\r\n", 
sprint_mac_addr(&mac-> mac_addr)); 

ret = RT_SUCCESS; 

port = mac- > port; 
if (port NULL) { 

ret = !RT SUCCESS; 

goto err exit; 

} 

bzero(&enq, sizeof(enq)); 
tx_shelf = port->port_addr.aa_shelf; 
tx_slot = port->port_addr.aa_slot; 
txjaort = port->port addr.aa port; 

tx_vcl - SHELF_SLdT_POFrTTO VClm(NN SIG VCI, tx shelf, tx slot, 

txjx>it); " * - 

enq.afjype = LMI_CONFIG ENQ; 
enq.af_version = LMI_VERSE)N; 
enq.afjny_address = mac- > mac addr; 
resp = Imjjuild es cfg resp(macT &enq, &resp len); 
if (resp = = NULL) { " ~ 

goto err_exit; 

resp->lmijype_spec = LMI STATUS IND; 
BUILD_ATM_HDR(&atm hdr, tx vci); ~ 
BUILD^UCAST^PREFIXC&prefoc tx shelf, tx slot, tx port); 
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ret = Imsend es_cfg_resp(prefix, atmjidr, resp, resp len); 
return (ret); 

err_exlt: 
Teturn (ret); 

} 

lm_send_es_cfg_resp(prefix. atmjidr, resp, resp len) 
7m_prefix_t prefix; 
Im^atmjidrj atm hdr; 
lm_es_cfg_resp_t *resp; 

Int ret; 
SETUPJTCB; 

If (CHKJ/B(UVI_VB_MSGS)) { 

printfCsending es_cfg_resp, prefix = Ox%x, atmjidr = Ox%x\r\n u , 
prefix, atmjidr); 

If (resp = = NULL) { 
goto err exit; 

} 

ret = AALJ)ataSendNR(&tcb->my_aal key, resp, resp len, 

*((tUINT32 *) & prefix), *((tUINT32 *) & atmjidr)); ~ 
return (ret); 

err exit* 

Tf (CHK_VB(LM VB ERRS)) { 

printf ("Couldn't send a null aal msg\n"); 

} 

return (-1); 



send_mcast_cfgO 
Int ret; 

} 

Imjcb t * 
lm Inittf 

{ ~ 

Imjcb J *ret; 
Int" err cod6; 

tUINT32 If 
int lm_crt cfgO; 

struct wdb_msg *wmsg; 
lm_glbl_cfgj<eyj key; 

ret = (Imjcb t *) malloc(SIZE LM TCB); 
If (ret = = NUlL) " " 



WO 94/07316 



PCT/US93/08674 



!m util.c 

-154- 

goto err_exit; 

SetGlobalP(ret); 
bzero(ret, sizeof(*ret)); 
ret->cur bid « 0; 

ret->my~node - MHW GetNodeNumberO; 
ret->my~shelf = MHV\TGetShelfNumber(); 
ret->my_slot - MHW_&etSlotldO; 
bzero(&fet->port tmplt, slzeof(ret->port tmplt)); 
ret-> port_tmpltaI_type = AAT_PORT; 
ret->portjmpftaa_country = USA; 
ret->port_tmpltaa node = ret->my_node; 
ret->port tmpltaa~shelf = ret->my_shelf; 
ret->tmr_blk = Timerlnit(l); 

LMJNIT_PORT ADDR(&ret->nac atm_addr, ret->my_node, ret->my_shelf, 

ret->m£slot, 0); 
ret->dflt_mtu_size » LM_DFLT_MTU SIZE; 
ret->dflt numjncasts = LM_DFLT_NTUM_MCASTS; 
ret->verBose = LM_VB_ALL; 

ret->mac_q = &ret->mac_queue; 
ret->port_q = &ret->port_queue; 
ret->vlan_q = &ret->vian_queue; 
ret->mv_q = &ret->mv_queue; 
ret->pvjq = &ret->pv_queue; 
ret->vc_q = &ret->vc_queue; 
inlt_q (ret- > mac_q) ; 
lnit~q(ret->port q); 
Inlt_q(ret->vlan^; 
init"q(ret->mv_q); 
init~q(ret->pv q); 
inft_q(ret->vcTq); 

/* throw away the Oth bid, as per jib's recommedation */ 
blts^get^bitfret^bid^bfts, SIZE_BID_BITS); 

encode « AAL_SAP_Create(LM START VCI, LM END_VCI, LM_AAL SID, 
&ret->my aal key); 
#ifdefUNIX - ~ 

GetTid(&ret->mytld); 
#else /* ffdef UNIX */ 

ret->mytld.Generfc = TID LM; 

ret->mytld.lnstance = LM~INSTANCE; 
#endlf /* ffdef UNIX */ 

GetPid(&ret->mypid); 

ret->do_cfg_wrts « TRUE; 

key.tag = G LBL_CFG_KEY; 

wmsg = wdb_sehdjetch_wait(&key, slzeof(key)); 
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If (wmsg = = NULL 1 1 wdb _get_ercode(wmsg) != 0) { 

lm_k!udge_data inltO: 
} else { 

ret->do_cfg_wrts = FALSE; 
wdb_send startup queries(lm_crt cfg); 
ret- > do cfg wrts = TRUE; 
} ~ ~ 

SendProxyCheckln(MHW_GetCardTypeO. MHVVGetSlotldO); 
return (ret); 

err_exit: 

return (NULL); 



lm_mac_t * 
add_mac(mac addr) 

lm mac ac(3r t *mac addr; 

{ " " " 
lm_macj *ret; 
qlinkj *iink; 
Immac t *tmp; 
SETUP_TCB; 

If (CH K_V B (LM_VB_TERSE)) { 

printf("adding mac addr %s\r\n", sprint_mac_addr(mac_addr)); 

macadd r- > aajy pe = AAT_MAC; 
ret =" FIND MAC(tcb->mac q, mac addr); 
if (ret != NOLL) 
return (ret); 

ret = (Irrwnac t *) malloc(SIZE LM MAC); 
if (ret == NULL) " " 

goto err_exit; 

bzero(ret, SIZEJ-MMAC); 
ret->mac_addr = *mac_addr; 
ret-> mac_addr.aa_type^= AAT MAC; 
ret- > port = NULL; 
ret->mv_q = &ret->mv_queue; 
init_q(ret->mv q); 
lntt_qlink(&ret-> macjink. ret); 

ATCH_MAC_MV Q(tcb->mv_q, ret); 
PUTQ_SORTED~MAC(&ret-> macjink, tcb-> mac_q); 
lm_wrt mac_cfg(ret ( NULL); 
return fret); 



err exit: 

"Drash(999. 0, 0); 
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} 

Im portj * 
add_port(port addr) 

lm_port_addr_t *port_addr; 

Im port t *ret; 
SETUPjTCB; 

port_addr->aa_type = AAT PORT; 
port~addr-> aa~country = USA; 

If (CHK_VB(LM VB TERSE)) { 

> printf ("adding port %s\r\n", sprint jDort_addr(port_addr)); 

ret m FIND PORT(tcb->port q, port addr); 
If (ret l= NOLL) " 
return (ret); 

ret = (lm_port t *) maIioc(SI2E LM PORT); 
If (ret = = NULL) " ~ 

goto err_exit; 

bzero(ret, SIZE_LM_PORT); 
ret->port_addr^= *port_addr; 
ret->port_addr.aa_type = AAT_PORT; 
ret->port~addr.aa~larinum = 0; 
ret- > mac = NULL; 
ret->pv_q = &ret->pv queue; 
init q(ret->pv__q); 
iniTqlinkf&ret^portJink, ret); 

ATCH_PORT _PVQ(tcb->pv q, ret); 
PUTQ_SORTED PORT(&ret->port link, tcb-> port q); 
Imwrt port_cfgTret); 
return fret); 

err_exit: 

Crash(998. 0, 0); 

Im vlanj * 

add_vlan(vlanjd, mtu, num m casts, name) 
Imj/lanjdj vlanjd; 
Int mtu; 
int num_mcasts; 
char *name; 

lm_ylan t *ret; 
int i; 
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SETUPJTCB; 

If (CHKVB(LM_VB TERSE)) { 

printf ("adding vlan %d, mtu = %d, num mcasts - %d, name » %s\r\n", 
vlan id, mtu, num mcasts, name)f 

} 

ret = FIND VLAN(tcb->vfan q f vlan id); 
If (ret != NULL) 
return (ret); 

ret = (Im vlan t *) malloc(SIZE LM VLAN); 
If (ret = =TNUlX) *~ ~ 

goto err_exit; 

bzero(ret, SIZE_LM VD\N); 
ret- > vlan Jd - vlan~ld; 

ret->mtu"size = nrtu; 
ret- > num jncasts = 0; 
ret->dflt_mlid « LM MAX_MUD; 
strcpyfret^vlanname, name); 
ret->mv_q = &ret->mv_queue; 
ret->pv_q = &ret->pv_queue; 
ret->vc_q = &ret->vc_queue; 
ret->free_vc_q = &ret->free_vc queue; 
init_q (ret- > my_q) ; 
inlt_q(ret->pvjq); 
init_q(ret- > vc_q) ; 
init_q(ret->free_vc q); 
Init_qlink(&ret->\da7ijink, ret); 

chg_num_vcs(ret, num_mcasts); 

ATCH_VLAN_MV Q(tcb->mv q, ret); 
ATCH^VLAN PVl3(tcb->pvJq, ret); 
PUTQ_SORTED JVLAN (&ret- > vlanjink, tcb->vlan q); 
lm_chg vian_cfg(ret, &ret->dflt_mlid, NULL, NULC NULL); 
return (ret); 

err exit: 

"Crash(997 f 0, 0); 



lm_vc_t * 
geffree_vc(vlan) 

Im vlan t *vlan; 
{ " ~ 

lm_vc t *ret; 

qlinkf *||nk; 



ret = NULL; 
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link = HEAD Q(vian->free vc q); 
if (link = = NULL) 
goto err_exit; 

ret = (lm vc t *) link->data; 
rmq(link)f 

PUTQ SORTED_VC(link, vlan->vc q); 
return^ret); 

err exit: 

Tetum (NULL); 

} 

lm_vcj * 
add_vc(vc_addr) 

lm vc addr t *vc addr; 

{ " " " 
lm_vcj: *ret; 
lm~viari_t *vlan; 
SETUPJTCB; 

if (CHK_VB (LM_VB_TERSE)) { 

printf ("adding vc %s\r\n" f sprint_vc_addr(vc_addr)); 

ret = NULL; 

vlan = FIND VLAN(tcb->vlan q, vc addr->vlan id); 
If (vlan = = NULL) " 
goto err_exit; 

ret = FIND VC(vlan->vc q, vc addr); 
if (ret 1= NULL) 
return (ret); 

ret = get free vc(vlan); 
if (ret = = NUCL) 
goto err_exit; 

ret->vc_addr = *vc_addr; 
ret->ref_cnt = 0; 
return (ret); 

err_exit: 

return (NULL); 

} 

chg^num^vcsjvlan, nunrvvcs) 
lm_vlan_t *vlan; 
tlNT32 num vcs; 

{ 
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int ret; 

int delta; 

int i; 

qllnkj *llnk; 

qlink_t *next; 
lm_vcj *vc; 

Int on_vc_q; 

ret = 0; 

delta - num vcs - vtan->num mcasts; 
If (delta < Of { 

on vc q = FALSE; 
lin(T=TlEAD Q(vlan->free vcq); 
for (I = 0; i > delta; I-) { " 
tf (link = m NULL) { 
if (on_vc_q) 
break; 

link = HEAD Q(vlan->vc_q); 
on vc q = TRUE; 

} " " 

if (link = - NULL) 

break; 
next = llnk->next; 
vc = (lm_vc_t *) link- > data; 
free_vc(vc); 
ret-; 

link = next; 

} 

} else if (delta > 0) { 

for (i = o; i < delta; I++) { 
add_free_yc(vlan); 
ret+ + ; 

} 

} 

vlan- > num_mcasts = num_vcs; 
return (ret); 



lm vc__t * 
ad3_free_vc(vlan) 
lm vlan t *vlan; 

{ " ~ 

lm_yc_t *ret; 
lm_mac_addr t mac addr; 
Imbidt bid; ~ 
SETUP_TCB; 

bid = bits get btt(tcb->bid bits, SIZE BID BITS); 
If (bid ==~"-1) ' * " " 
goto err exit; 
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If (CHK_VB(LM VBJTERSE)) { 

printf ("getting a free mcast vc for vlan %s, bid ■ %d\r\n", 
sprintjrfanJd(&vlan-> vlanjd), bid); 



ret = (lm vc t *) malloc(SIZE LM VC); 
if (ret = = NULL) 
goto err_exit; 

bzero(ret, SIZE LM_VC); 
LM_CLR_M ACjADD R (&mac addr); 

LM JNIT_VC_ADDR (&ret- > vc_addr, vlarv>vlanjd ( &mac_addr); 

ret- > bid = bid; 

ret- > vlan = vlan; 

init_qlink(&ret->vcjink, ret); 

init~qlink(&ret->vlan link, ret); 

P mQ_SORTED_VCfaret- > vc Jink, tcb- > vc_q) ; 

PUTQ_SORTED_VC (&ret- > vlan Jink, vlan- > f ree_vc_q) ; 

return (ret); 

err exit: 

*Crash(994, 0, 0); 

} 

lm_port vlanj * 
add_pv(port_addr, vlanjd, mlid) 

lm_port_addrJ *port_addr, 

lm_vianjdj vlanjd; 

lm mlid t ~ mlid; 

{ 

lm_port_vian t tmp; 
ImjDortj/lanJ *ret; 
InTportJ *port; 
Imvlan t *vlan; 
SETUPJTCB; 

If (CHK_VB(LM_VB_TERSE)) { 

printfCadding pv, port addr = %s, vlan = %d. mlid » %d\r\n", 
sprint port addr{port addr), vlan id, mlid); 

} ~ ~ ~ 

tmp.vlan _ld = vlanjd; 
tmp.port_addr = *port_addr; 
ret = FIND PV(tcb->pv q, &tmp); 
If (ret I = NOLL) 
return (ret); 

ret = (lm port vlan t *) malloc(SIZEJJtf PORT VLAN); 
if (ret = =~NULL) ~ " 
goto err exit; 
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bzero(ret, SIZEJJYI_PORT_VLAN); 
ret->port_addr = *port_addr; 
ret- > vlanjd = vfanjd; 
ret- > port = NULL; 
ret->vlan = NULL; 
ret- > mlid = mild; 
init_q!ink(&ret->pv link, ret); 
init_qllnk(&ret->port link, ret); 
inft^qlinkf&ret^vlannink, ret); 

ATCH_PV_VLAN_Q(tcb->vlan q, ret); 
ATCH_PV PORT Q(tcb->porf q, ret); 
PUTQ^SORTED T>V(&ret->pvlink, tcb->pv q); 
lm_wrT pv cfg(ret); 
return Jretjl 

err exit: 

Crash(996, 0, 0); 

} 

Im_mac_v1anj * 

add_mv(mac_addr, vlanjd, mid, mlid) 
Imjnac addr t *mac addr; 
lm_vlanjd_t ~ vlanjd? 
int mid; 
lm mlid t mlid; 



{ 



lm_mac_vlanj tmp; 
Immac vian t *ret; 
SETUPjTCBf 

if (CHK_VB(LM_VB_TERSE)) { 

printffadding mv, mac addr - %s, vlan » %d, mid = %d, mlid « %d\r\n", 
sprint_mac_addr(mac_addr), vlanjd, mid, mlid); 

tmp.mac_addr = *mac_addr; 
tmp. vlanjd = vlan id; 
ret = FIND MV(tcb->mv q, &tmp); 
if (ret 1= NOLL) 
return (ret); 

ret = (lm mac vlan t *) ma!loc(SIZE LM MAC VLAN); 
If (ret = ="NULL) ~ - " 

goto err_exit; 

bzerofret, SIZE JJd_MAC_VLAN) ; 
ret->mac_addr = *mac_addr; 
ret->vianjd = vlan id; 
ret- > mac = NULL;~ 
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ret->vlan = NULL; 
ret- > mid = mid; 
ret->mlid = mlid; 
lnlt_qlink(&ret->mv link, ret); 
iniTqlink(&ret->macJlnk, ret); 
init_qlink(&ret->vlanjink ( ret); 

ATCH MV VLAN Q(tcb->vlan q, ret); 
ATCH~M\TMAC "Q(tcb->mac"q. ret); 
PUTQ_SORTED MV(&ret->mv link, tcb- >mv_q); 
lm_chg mv_cfg(ret f &ret->mlidj; 
return (ret); 

err exit: 

*£rash(995 t 0, 0); 



free_tcb(tcb) 

lm tcb t *tcb; 

{ 

if (tcb ! = NULL) { 

FREEVLAN Q(tcb->v1an q); 
FR EE_MACJQ (tcb- > mac ~q) ; 
FREE PORT Q(tcb->port q); 
FREE_VC Qltcb->vc q); " 
FREE_MVJ3(tcb->mv q); 
FREE_PV Q(tcb->pv q); 

ImrmglETlcfgO; 
free(tcb); 

} 

} 

freejnac(mac) 

lm mac t *mac; 

{ ~ " 
SETUPJTCB; 

if (mac I = NULL) { 

If (CHKVB(LM_VB TERSE)) { 

printfffreeing mlc addr = %s\r\n\ 

sprint_mac_addr(&mac-> macjaddr)); 

lrnjm_mac_cf g (mac) ; 
rmq(&mac->macjink); 
FREE_MV_Q(mac-> mv_q); 
lm send_es_cfg ind(mac); 
if (mac->port 1 = NULL) { 

mac- > port- > mac = NULL; 

mac- > port = NULL; 
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free(mac); 
return (NULL); 

} 

free_ylan(v!an) 

Im vlan t *vlan; 

{ " ~ 
SETUPJTCB; 

K (vlan I « NULL) { 

If (CHK_VB(LM VB_TERSE)) { 
printf ("freeing vlan %s\r\n". 

sprint vlan id (Avian- > vlan Id)); 
} ~ ~ 

lm_rm_vlan_cfg(vlan) ; 
rmq(&vlan->vlan link); 
FREE_PV_Q(vlan- > pv_q) ; 
FREE MV Q(vlan->mv q); 
FREE"VCj3(vlan->vc_q); 
FREE_VC Q(vlan->free_vc_q); 

bits free Eitfvlan^dfl^mHd, tcb->mlid_blts. SIZE_MUD BITS); 
free(vfanj; 

return (NULL); 

} 

free_vc(vc) 

Im vc t *vc; 

{ ~ ~ 
SETUPJTCB; 

if (vc!= NULL){ 

If (CHK_VB(LMJ/B TERSE)) { 
printfffreelng vc"%s\r\n", 

sprint_vc_addr(&vc- > vc_addr)) ; 

lm_rm_vc cfg(vc); 
rmq(&vc- > vc Jink) ; 
rmq(&vc->vlan link); 
vc->vlan = NULL; 

bits f ree_bit(vo> bid, tcb->bid_blts, SIZEBID BITS); 
freelvc); 

} 

return (NULL); 



f reexport (port) 

lm_port_t *port; 
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SETUPJTCB; 

If (port I m NULL) { 

if (CHK_VB(LM_VB_TERSE)) { 

printfHreeing port addr = %s\r\n", 

sprint j30rt_addr(&port-> portjaddr)) ; 

lm_rm_port_cfg (port) ; 
rmq(&port->port link); 
if (port- > mac !=~*NULL) { 

port- > mac- > port = NULL; 

port->mac = NULL; 

} 

FREE_PV_Q (port- > pv_q) ; 
free(port); 

} 

return (NULL); 

} 



free_port_pv(pv) 
lm_port_vian_t *pv; 

Importt *port; 

if (pv != NULL) { 

rmq (&pv- > port Jink) ; 
port = pv->port; 
If (port != NULL) { 

bits free_bit(pv->mlid, port->mlid bits, 

SIZE_MUD_BITS); 
pv->port = NULL; 

} 

} 

return (NULL); 



free_vlan_pv(pv) 
lm port vlan t *pv; 

{ " " " 
If (pv!= NULL) { 

rmq(&pv->vlan link); 

pv->vlan = NULL; 

} 

return (NULL); 

} 

freej>v(pv) 

lm port vlan t *pv; 

{ " ~ ~ 
SETUPJTCB; 
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ff (pv != NULL) { 

V (CHK VB(LM VB TERSE)) { 

prlntTffreeing pvT port addr « %s, vlan « %d, mlid = %d\r\n\ 
sprlnt_port_addr(8ipv->port_addr) l pv->vlanjd, 
pv->mlid); 

} 

lm_rmjDv_cfg(pv) ; 
rmq(&pv->pvjink); 
f ree_vlan_pv(pv) ; 
free port pv(pv); 
freefov); " 

} 

return (NULL); 



free_mac_mv(mv) 
Im mac vlan t *mv; 

{ ~ " - 
lf(mv!= NULL) { 

if (mv->mac != NULL) { 
rmq(&mv-> mac Jink); 

bits free bit(mv->m!ld, mv->mac->mlid bits, 

SIZE MUD_BITS); 
mv->mac =TslULL; 

} 

} 

return (NULL); 



free_vlan_mv(mv) 

Im mac vlan t *mv; 

{ " ~ ~ 
If (mv ! = NULL) { 

if (mv->vlan l = NULL) { 
rmq(&mv->vlan link); 
mv->vian = NULL; 

} 

} 

return (NULL); 

} 

freejnv(mv) 

Im mac vlan t *mv; 

{ " " " 
SETUPJTCB; 

if (mv I m NULL) { 

If (CHK_VB(LM_VB_TERSE)) { 

printf("freeing mv, mac addr = %s, vlan = %d\r\n\ 
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sprint_mac addr(&mv->mac addr), mv->vtanjd); 

} 

lm rm mv cfg(mv); 
If (mv->macl = NULL) 

lm sendes cfg lnd(mv->mac); 
rmq(£mv-> mylinkj; 
free_macjnv(mv) ; 
free vlanjnv(mv); 
free(mv); 

} 

return (NULL); 

} 

free_macj3ort(mac, port} 
irrwnacjt *mac; 
lm port~t *port; 

{ ~ " 

If (mac != NULL) 

mac->port = NULL; 
If (port I m NULL) 

port- > mac = NULL; 
return (NULL); 

} 

chk_port_mlid(port l mlid) 
lm_port_t *port; 
lm mlid t mlid; 

{ " " 
int ret; 

ret = bits tst_blt(mlld, port->mlld_blts, SIZE_MUD_BITS); 
return (retf; 

} 

chk_mac_mlld(mac t mlid) 
Imjnacjt *mac; 
Inrfmlid t mild; 

{ " " 
Int ret; 

ret = bits tst_blt(mlid. mac->mlid_bfts, SIZE_MUD_BITS); 
return (retj; 

} 

lm_macj * 
cmp_mac(mac, mac_addr) 

lm_mac_t *mac; 

lrrTmac~addr t *mac addr; 

{ " " " 

If (cmp_mac_addr(&mac-> mac_addr, mac_addr) ==0) 
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return (mac); 
return (NULL); 



lnrwnac_t * 
cmpnextjnacfmac, mac_addr) 

lm_mac t *mac;~ 

lm_mac~addr_t *mac_addr; 

Int ret; 

ret = cmpjnac addr(&mac-> mac addr, mac addr); 
If (ret >= 0) 
return (mac); 

return (NULL); 



fm_port_t * 
cmp_port(port, port_addr) 

lm_port_t *port; 

lm port"addr t *port addr; 

{ " " " 

If (OTpjDort_addr(&port->port_addr, port_addr) = = 0) 

return (port); 
return (NULL); 



lm_port_t * 

cmpnex^portfport, port_addr) 

lm_port_t *port; ~~ 

lm port addr t *port addr; 
{ ~ ~ ~ 

Int ret; 

ret « cmp port_addr(&port->port addr, port addr); 
if(ret>=0) 
return (port); 

return (NULL); 



lm_vlan_t * 
cmp_vfan(vlan, vlanjd) 

lm_vlan t *vlan; 

lm v!an~ld t vfan id; 

{ " " " 

If (vtan->vtanjd = = vlanjd) 

return (vlan); 
return (NULL); 
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lm_vlanj * 
cmpnext^vlantvlan, vlanjd) 

lm_vlanj *vlan; 

im vtan Id t vlan Id; 

{ " " " 
int ret; 

ret - cmp_vfan_ld(&vlan->vian id, Avian id); 
if (ret >= 0) 

return (vlan); 
return (NULL); 

} 

lm_vc_t * 
cmp_vc(vc, vc_addr) 

lm_vc_t *vc; 

Im vc addr t *vc addr; 

{ " " " 

if (cmp_vc_addr(&vc->vc_addr, vc_addr) = = 0) 

return (vc); 

return (NULL); 

} 

lm_vc_t * 
cmpnext_vc(vc, vc_addr) 

lm_vc_t *vc; 

Im vcTaddr t *vc addr; 

{ 

int ret; 

ret = cmp_vc_addr(&vc->vc_addr, vc_addr); 
if (ret > = 0) 

return (vc); 
return (NULL); 



lm_mac_vlan_t * 
cmp_mv(mv, tst) 

lm_mac vlan t *mv; 

Im mac~vlan"t *tst; 

{ " " " 

if (cmp_mac_addr(&mv->mac_addr l &tst->mac_addr) == 0 && 

cmpjrian ld(&mv->vtanjd, &tst->vlanjd) « 0) 

return (mv); 

return (NULL); 

} 



